in reply to RegEx and Packaging Name Problem
print "Match found\n" if $dna1 =~ /\sCA[ACT]TC/g; [download]