$string =~ s/[^[:alnum:]\s'-]//g;