let rec($)x?(c=input_char stdin)y=c>y&print_char c=();c='"'&y$x;x$y;;'\x09'$' '
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page