sub isASCII { !!( $_[0] =~ tr/\x00-\x7F//c ) }