y/B-M/C2-9TJQK/,($a.=<>)=~$_&&print$_.$"for AA..ZZ