main=interact$f.read.concat.("0x":).reverse.words f 8="" f x=toEnum(read$show$x`mod`512):f(x`div`512)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page