#!perl -lpa $_='(6-2)*(0-6+((8=(2-=0)*2+(6=3-1)*6)*(5-=1)-(9=(4-=0)*4+5*5)*6)/(5=2*5-4*6)-2)>(3-7)*((9*2-8*4)/5-7+1-6)';$_=s/\d/\$F[$&]/g&eval
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page