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