(doseq(s(asdf::split(read-line)()"1"))(princ(int-char(+(length s)(#1=char-int(char"\x1f `cfilosv"(-(#1#(char s 0))48)))))))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page