Re^2: counting overlapping patterns

[dave_the_m]

$count++ while $string =~ /\GAA/gc;

Er, no, the \G there serves no purpose as that's the default behaviour anyway. On this other hand this will work, by only consuming the first character of the match:

$count++ while $string =~ /A(?=A)/g;

Dave.

[Anonymous Monk]

Dave you truly are "the m". That works as promised. Thanks!