my ($word1, $word2) = split(/[^A-Za-z0-9]+/, $message);