$phrase =~ s/[^\s*\w*]//g;