$==++$i,$0=!print$_-1?${1while$0=$=%$_.$0,$=/=$_}:1x$=,$/for(1..10)x10
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page