$line=<FILE> if $line =~ /regexp/; [download]
Is it what are you searching for?
In reply to Re: next line by ph0enix in thread how do I get perl to skip lines reading a text file? by harry34