$code =~ s/[^\/\w"':.;]//g;