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