$str='cbbbaaabbbc';
$str=~m/bbb(.*)bbb/;
$a=$1; # $a='aaa';
...