"'Sam I am,' said Samwise" =~ /(Samwise|Sam)/;   # $1 eq "Sam"