Help for this page

Select Code to Download

Select or download this

# You wrote
if ( $line =~ /PatternBegin/ .. $_ =~ /PatternEnd/ ) {

# You wanted.
if ( $line =~ /PatternBegin/ .. $line =~ /PatternEnd/ ) {