perl -e <<EOF
$_="AsM7IHtSraOm2R0ae7Ir1dH";
tr/a-z0-9//ac; tr/a-z/A-Z/;
$_=reverse;s/[0-9]//g;print;
EOF