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

Point taken (although I don't think of $. as particularly obscure.) Slight modification: 
1 while <DATA> and $. < 21;

[download]

In Section Seekers of Perl Wisdom