Re^2: Free perl obfuscation service

[Ven'Tatsu]

It doesn't even get trivialy more complex code correct

print q'foo', $/;
$bar =~ s/'/\\'/g;

To

print q"\x66\x6f\x6f",$/;$bar=~ s/"\x2f\x5c"/g;

Neither statement is translated correctly.

The author should be forced to write "Only perl can parse Perl." 500 times on the black board.