$\=~s/$/$_
$`\l$_
$`/mfor A..Z;print