Re: frame shift in Perl string matching

[GrandFather]

in reply to frame shift in Perl string matching

Use a look ahead assertion:

my $str = "PPPP";
my $search = "PP";
my $count = () = $str =~ /(?=$search)/g;
print $count;

[GTI]

Thanks!