DB<21> say 'aaabbbb' =~ /aa(?!a)b{0,2}/; say "<$&>" 1 #### DB<22> say 'aaaccccaaabbbb' =~ /aa(?!a)b{0,2}/; say "<$&>" 1