in reply to how do I get perl to skip lines reading a text file?

$line=<FILE> if $line =~ /regexp/;

Is it what are you searching for?