<>;$a=<>;y/a-q/DCHSA23456789TJQK/,$a=~$_&&print$_.$"for aa..dz