Without 'g' modifier:

1.>perl -e 'use re(debug); $_ = 'aaabbb'; /(( a | c? )*)/x'
2.>perl -e 'use re(debug); $_ = 'aaabbb'; /(( a )* | ( c? )?)/x'
[download]