nicht angemeldet
Hallo erneut,
mir ist da etwas eingefallen und zwar betrachtet mal folgenden Code (ungetestet):
################################################
#!/usr/bin/perl -w
use strict;
print "Suchwort: ";
my $suchwort = <STDIN>;
chomp $suchwort;
open (FH, "<datei.txt");
my @liste = <FH>;
print grep/$suchwort/i, @ausgabe;
close FH;
################################################
Ich müsste natürlich erst die grep-ausgabe wo speichern sie in ein Array setzen und dann zeilenweise auslesen lassen - wie ich des mach weiss ich noch nicht.
Wäre das eine funktionierende Idee oder gibt es da was besseres/sicheres?
Struppi