http://qs1969.pair.com?node_id=770992


in reply to skipping the first line of a file

TIMTOWTDI ,

The other suggestions thus far assume a line-by-line read of the file, if you're slurping the file in, howz about...

my ($first, @rest) = <DATA>; warn "first: $first"; warn "rest:\n@rest"; __DATA__ header line1 line2
user@unforgiven:~$ perl tst.pl first: header rest: line1 line2 user@unforgiven:~$
A user level that continues to overstate my experience :-))