in reply to Pattern matching forwards/backwards???
1. /\QXFGHWW\E/
2. /([^-.]{3})/
together:
$_ = 'KLEWREGREG-----REGREGEWD....-EWGREGERABCSHRE..----...XFGHWW'; /([^-.]{3})[-.]*\QXFGHWW\E/; print $1;
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: Pattern matching forwards/backwards???
by JavaFan (Canon) on Jun 15, 2009 at 11:03 UTC | |
by CountZero (Bishop) on Jun 15, 2009 at 11:15 UTC |
In Section
Seekers of Perl Wisdom