$param =~ s/[^a-zA-Z0-9_]//g;