in reply to Simple regex needed
You could try this:
$line = "- - - - - - - - - - - - - - - - - - - - Frame 123 - - -"; $line =~ /^[- ]+Frame +(\d+)[ -]+/; print $1;
|
---|
In Section
Seekers of Perl Wisdom
in reply to Simple regex needed
You could try this:
$line = "- - - - - - - - - - - - - - - - - - - - Frame 123 - - -"; $line =~ /^[- ]+Frame +(\d+)[ -]+/; print $1;
|
---|