y/EI-PUVW/C2-9JQK/,($a.=<>)=~$_&&print$_.$"for AA..ZZ