in reply to [Solved]Need to extract a particular block of lines between two patterns
Use the return value of the flip-flop:
my $count; while (<$fh_r>) { if (my $status = /START/ .. /END/) { $count++ if $status == 1; print if $count == 2; } }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: [Solved]Need to extract a particular block of lines between two patterns
by chengchl (Acolyte) on Nov 11, 2017 at 01:33 UTC | |
by AnomalousMonk (Archbishop) on Nov 11, 2017 at 02:31 UTC |
In Section
Seekers of Perl Wisdom