Opened by bloonix at 2006-08-19 22:46
User since
2005-12-17
1615 Artikel
HausmeisterIn
![[Homepage]](/battie/theme/default/homepage.gif)
2005-12-17
1615 Artikel
HausmeisterIn
Hallo Leute,
wie überspringt man am besten die erste Zeile beim Auslesen eines
Filehandles? Ich weiß, dass die erste Zeile immer der Header ist und den
ich nicht verarbeiten möchte.
Ich hatte mir zunächst folgendes gedacht:
Aber dann wird $_ geschrieben. Wie macht man das am Saubersten?
In einer Shell würde ich nach /dev/null umleiten, aber geht sowas auch
in Perl?
Gruss,
opi
wie überspringt man am besten die erste Zeile beim Auslesen eines
Filehandles? Ich weiß, dass die erste Zeile immer der Header ist und den
ich nicht verarbeiten möchte.
Ich hatte mir zunächst folgendes gedacht:
Code: (dl
)
1
2
3
4
5
open my $fh, '<', $file or die $!;
<$fh>; # erste Zeile "überspringen"
while (my $line = <$fh>) {
# Verarbeitung
}
Aber dann wird $_ geschrieben. Wie macht man das am Saubersten?
In einer Shell würde ich nach /dev/null umleiten, aber geht sowas auch
in Perl?
Gruss,
opi
What is a good module? That's hard to say.
What is good code? That's also hard to say.
One man's Thing of Beauty is another's man's Evil Hack.
What is good code? That's also hard to say.
One man's Thing of Beauty is another's man's Evil Hack.