C to Perl converter by mitchs (teebee,llhuii)

sub(/    /,_)?(/^i/&&$1="my")gsub(/[abi]\y/,"$&"):i^=$!i=i?_:"#"

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

download

return to the top page