Help for this page
use strict; my $flag = 0; my $few = shift || 2; ... Second line after match Third line after match Fourth line after match
H:\perl> perl 1156056.pl First line after match ... First line after match Second line after match Third line after match