C to Perl converter by MG

#!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