22/01/31 21:41:49.66 TKYU0FmV.net
どうして[aa][aa][aa]や[aa]b[aa]ab[aa]にはならないのですか
URLﾘﾝｸ(ideone.com)
my $str = 'abab';
$str =~ s/(?<=\Ka)b/[$&]/g;
print ${str}; # [ab][ab]
my $str = 'aaaaaa';
$str =~ s/(?<=\K.)./[$&]/g;
print $str; # [aa]aaaa
my $str = 'aabaaabaa';
$str =~ s/(?<=\Ka)a/[$&]/g;
print $str; # [aa]b[aa]abaa