#!perl -p s/#.+//;s/(\W)([abi])(?=\W)/\1\$\2\3/g;s/(\W)int(\W)/\1my\2/;s/^(\w|\}).*//;s/^\s{4}//;s|//|#|g
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page