A nice way to deal with lines of a file in perl is to create an array that holds each line of the file. Then you can process the lines using the very nice perl array manipulation commands, such as  shift, pop, push, splice, join, split, for, and, for the adventurous map.

Here is an example:

use strict;
 
my $data="The first line
the second line
the third line
the last line.
";
 
my @lines= split(/\n/, $data);
shift @lines;
print join "\n", @lines;
print "\n";
[download]

It should work perfectly the first time! - toma