http://www.perlmonks.org?node_id=777637


in reply to Re^2: Parsing/regex question
in thread Parsing/regex question

Then in the while loop you can do something like this:
... if (0 < $lines_to_skip) { if ($line =~ /datestamp-regex/) { next LINE; } # we are at the next date stamp line so fall through, etc. } ...
Also rename $lines_to_skip to something suitable.