perl6 -n -e '.say if![+] -1,.uc.ords X-64'