1
2
3
4
5
6

#...
open my $handle, '<', $dateiname or die "$dateiname: $!";
while ( my $line = <$handle> ) {
  # tu was mit $line
}
close $handle;

meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!