$_ = '123'; if(/(1|12)(2?)/) { print "1=[$1] 2=[$2]\n"; } if(/(12|1)(2?)/) { print "1=[$1] 2=[$2]\n"; }