in reply to Looping through end of file once a match is found
Would you be looking for something as simple as this ?
# when $search_date is found beginning in the 52nd column # of a log entry that begins with 6 digits, then # print the matching line and the remainder of the file. my $gate = ''; for(<FILE>){ if ( $gate || ($gate = /^\d{6}.{45}$search_date/)){ print RESULT; } }
mkmcconn
In Section
Seekers of Perl Wisdom