gets $<.bytes{|b|b<11?$.=1:$_[-$.-=1]-=b%6-2} print
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page