(prn:upcase:readline)