Leser: 26
2009-12-12T01:49:04 MikmakEs nervt halt, wenn der reguläre Ausdruck, der immer fast 20 MB groß ist, immer neu generiert werden muss.
1 2 3 4 5 6 7 8
my %bezeichner=map{($_,1)}('a'..'z'); # oder was für Bezeichner es sonst sind #... my @blocks=split(/\s+/,$data); # oder wie es sonst getrennt ist #... if(grep{$bezeichner{$_}}(@blocks)) { print "gefunden"; }
2009-12-14T19:58:39 MikmakZum ganzen Hintergrund: die Liste, die ich benutze ist eine Gesetzesliste, mit Bezeichnungen der Normen.