Help for this page
if ($string =~ tr/a-zA-Z0-9 //c) { # trigger error message. }
if ($string =~ tr/a-zA-Z0-9 \t\n//c) { # trigger error message. }