y/I-REFT/2-9CTK/,($a.=<>)=~$_&&print$_.$"for CA..SZ