in reply to Re: \G and regexes
in thread \G and regexes
Ok. After some tests, I get what you are saying.
The /g flag does not require that further matching must start past the end of the previous match--it just makes a request for any other unique matches. And the regex /(\w\w\w)*?TGA/ can act like the regex /TGA/ because a regex will happily match nothing for *.
But then why doesn't the /g flag cause this to match four times:
use strict; use warnings; use 5.010; my $str = 'aaaBBBcccTGA'; while ($str =~ /(?:\w\w\w)*?(TGA)/g) { say $1; say pos $str; }
Aren't there four unique matches:
1) when (\w\w\w) is matched 0 times. 2) when (\w\w\w) is matched 1 time. 3) when (\w\w\w) is matched 2 times. 4) when (\w\w\w) is matched 3 times.
That suggests that another match must end past the previous match--but that the next match doesn't have to start past the previous match.
My tests also show that starting the regex with a \A to anchor it to the beginning of the string will cause the regex to match only once:
use strict; use warnings; use 5.010; my $str = 'aaaBBBcccTGAddTGA'; while ($str =~ /\A(?:\w\w\w)*?(TGA)/g) { say $1; say pos $str; } --output:-- TGA 12
But then I would expect this to match twice, and it doesn't:
use strict; use warnings; use 5.010; my $str = 'aaaBBBcccTGAdddTGA'; while ($str =~ /\A(?:\w\w\w)*?(TGA)/g) { say $1; say pos $str; }
So I guess I don't have any idea what's going on.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^3: \G and regexes
by moritz (Cardinal) on Apr 05, 2010 at 20:54 UTC | |
by 7stud (Deacon) on Apr 06, 2010 at 04:03 UTC | |
by moritz (Cardinal) on Apr 06, 2010 at 06:53 UTC |