(princ(case(length(read-line))(5(! 9))(9 59049)(t 34)))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page