(port-map(^s(print(regexp-replace #/(?<=(\w *){16})\w/s(^m(char-upcase(~(m)0))))))read-line)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page