(princ(reverse(delete-if-not'alpha-char-p(read-line))))