$string =~ s/[^A-Za-z0-9._-]//g;