$n=11;s//print ,/;s/^/ /gm,s/.*/for v$n = 0 to 9 $& next/s,s/,/,,v$n/while--$n;s/,,//;s/0/1/;print
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page