in reply to check if string contains anything other than alphanumeric

if ( $string =~ /[^[:alnum:]]/ ) {