gudn tach!
in der theorie weiß ich, wie ich dateien öffne und in ein array auslese.
in der praxis auch?
also z.b. so:
sub loadFile{
my $infile=shift;
open(INFILE, "<".$infile) || die " file not found\n";
my @lines=<INFILE>;
close(INFILE);
return @lines;
}
my @file_content=loadFile('file.txt');
irgendwie muss ich dann durch das große array durchloopen und in jeder zeile das kleine array loopen.
ja, z.b. in etwa so
schleife ueber alle zeilen der zu durchsuchenden datei
schleiche ueber alle strings (nadeln), nach denen gesucht werden soll
suche nadel im zeile
falls gefunden: zeilennummernausgabe
schleifenende
schleifenende
suchen kannst du mit regulaeren ausdruecken (perldoc perlre).
so und jetzt faehrt gleich mein bus...
prost
seth