in reply to Re: Skip 21 Lines
in thread Skip 21 Lines

Any reason you wouldn't use: 
<HANDLE> for 1..21;
...

[download]
   MeowChow                                   
               s aamecha.s a..a\u$&owag.print

Replies are listed 'Best First'.
Re: Re: Re: Skip 21 Lines
by merlyn (Sage) on Apr 25, 2001 at 17:21 UTC
    You said:
    Any reason you wouldn't use: 
    <HANDLE> for 1..21;

    [download]
    Yes. Try that with <ARGV> (aka <>) when there's only 15 lines in the files specified on the command line. After it hits EOF, it now starts reading unexpectedly from STDIN for the remaining 5 lines (after 1 undef for the eof), because the process starts over!

    Moral: Always watch for an early EOF from a filehandle.

    -- Randal L. Schwartz, Perl hacker

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom