main=catch(readFile"a">>=putStr>>=w)w w _=getContents>>=writeFile"a"
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page