For Loop by brx

$_="print v".join",v",1..10;$n=11;s/^/  /gm,$_="for v$n = 0 to 9
$_
next"while--$n;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