(ignore-errors(loop(incf(getf /(intern(read-line))0))))(apply'format t"~@{~v@{~a\x0d ~1:*~}~*~}"(reverse /))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page