Thread grep inputfile geht nicht mit übergebener Variablen
(3 answers)
Opened by allapow at 2008-06-01 14:06
hallo Forum,
ich möchte in einer Liste nachsehen ob ein gewisser Eintrag vorhanden ist. Das ist soweit kein Problem, nur möchte ich diesen Suchstring öffter verändern und darum als Variable in die grep funktion einfügen. Das geht aber bei mir nicht... hier mal der Code: Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 use strict; use warnings; use IO::File; open( INPUTFILE, $ARGV[0]) || die "Konnte die Datei nicht öffnen"; while(<INPUTFILE>){ my $b = "/bla/"; # /bla/ /'bla'/ 'bla' "bla" usw geht alles nicht print $b,"\n"; my $a = grep {$_ = $b} <INPUTFILE>; # statt $b /bla/ funktioniert if ($a == 1) {print"Eintrag vorhanden!\n";} else{print"Keinen Eintrag gefunden!\n"}; } close( INPUTFILE ); wie kann ich das bewerkstelligen, was verstehe ich hier nicht? :-( blutige Perlanfängerfrage bestimmt... wo gibt es die passenden Infos für mich? |