Erste Zeile überspringen: beim Auslesen einer Datei - #69010 (Allgemeines zu Perl)

Strat

2006-08-20 14:30

User since
2003-08-04
5246 Artikel
ModeratorIn

achtung: $. funktioniert nicht bei

Code: (dl )

foreach my $line (<$fh>) {

weil da die gesammte datei auf einmal in ein unbenanntes Array eingelesen wird.

Bei den verwendeten while-construkten funktioniert's jedoch.

ich wuerde es folgendermaszen machen

Code: (dl )

1
2
3

{ my $ignoreFirstLine = <$fh>; }
while( defined (my $line = <$fh>) ) {
  ...

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/