sub w{print'M('x$i.~~$_.')'x$i.$/;$i--;$_>1e2?$_-=10:($i+=2,w(w($_+=11)))}$i=1,w,print 91for<>
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page