(?=a|b|c) #### perl -e '$_ = "(b)."; /\([abc]\)/ && do { print "match!\n"; };' #### perl -e '$_ = "(b)."; /\((a|b|c)\)/ && do { print "match!\n"; };'