#!perl -pl $_=9x$_;for$a(50,10,5,1){s/9{$a}/$a /g};chop
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page