#!perl -p s!.!$a[60+$.-pos]|='\x00 'x($.-1+pos).$&.$/!ge}for(@a){y/\x00*/ /
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page