Select Code to Download

$resp =~ s/[^a-zA-Z0-9\-\=\_\+\\\]\[\{\}\|\;\'\,\.\/\<\>\?\:\"\`\~\!\@
+\#\$\%\^\&\*\(\) \n]/NaN/gs;