Perl Special Variables by %20

s\x09^\x09!y" y#y$3333y%0y\&y'y(z zy)z zy*y+y,y-0y.y/ny0test.ply1y2y3y4y5y6y7y8y9y: n-y;\x1cy<zy=60y>zy?0y@y[0y\\y]5.014002y^STDOUT_TOPy_y`y{y|0y}y~STDOUT\x09
s/z/1000/g
y/y/\n/
s/^./$&=/mg
y/n/\n/

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

To protect the system from spam, please input your favorite sport (hint: I believe its name must start with 'g', case insensitive)

download

return to the top page