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