in reply to multi-line parsing
Try using the range operator - something like i.e. untested...
Note the use of both strictures and autodie - the latter causing the snippet to die if open() fails.use warnings; use strict; use autodie; open INF, "<$file"; while (<INF>){ if(/First line of text$/ ... /in the third line I have (\d*\.\d*)$ +/) { push @array, $1 if $1; } }
A user level that continues to overstate my experience :-))
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: multi-line parsing
by amit223 (Initiate) on Mar 31, 2009 at 19:05 UTC |
In Section
Seekers of Perl Wisdom