Transpose by yshl

[{(%stdin)(r)file 40 string readline not{exit}if}loop]0{1 40{1 index{1 index 1
getinterval print}forall pop()=}for}stopped

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page