http://www.perlmonks.org?node_id=147654


in reply to Amazing Regexp Grinder (ARG)

huh, what, did someone mention my name?

Nice obfu. That regexp makes me want to gouge out my eyeballs.

When you say I don't much take interest in obfuscations that use a big heap of arbitrary characters and then do a pack or ord on them you are on the same wavelength as BooK, obfu-meister extraordinaire, who considers such obfus as mere toys.

This, on the other hand, is evil. Deparsing produces code that doesn't perform the same way. And introducing print statements to see what is going on makes it bomb out with syntax errors. Fierce!


print@_{sort keys %_},$/if%_=split//,'= & *a?b:e\f/h^h!j+n,o@o;r$s-t%t#u'