string s='string s=\'xx\';string[][]table={{\'\\\\\',\'\\\\\\\\\'},{\'\\\'\',\'\\\\\\\'\'}};write(replace(s,\'x\'+\'x\',replace(s,table)));';string[][]table={{'\\','\\\\'},{'\'','\\\''}};write(replace(s,'x'+'x',replace(s,table)));
Note that non-ascii characters in the above source code will be escaped (such as \x9f).