(display"##")(do[(s(read-line)(string-copy s 1))]((#/^$/s))(display(if(or(#0=string>?" !"s)(#0# s"# #"))" ""#")))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page