Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

Re: Easier than it seems

by teamster_jr (Curate)
on May 08, 2006 at 13:11 UTC ( [id://547996] : note . print w/replies, xml ) Need Help??

in reply to Easier than it seems

I couldn't sleep last night and started deobfuscating this. This is very rough and i haven't investigated too closely how it actually does stuff - just ran perltidy, then dropped some basic substitutions and dropped prints in certain places but of course i could be wrong :)

Replies are listed 'Best First'.
Re^2: Easier than it seems
by Hue-Bond (Priest) on May 08, 2006 at 18:16 UTC
    (ie the third and fourth arguments with "e" in the middle)

    Yes. I wanted to insert some dummy code that used the other variables but forgot it :^). Now I think it was a good thing because otherwise that code would stand out among the rest. I also wanted to give the code a dollar shape, but didn't (and don't) know how.

    As for the generation of the code, turo, it wasn't automatic. Just search and replace here and there.

    David Serrano

      no automation? ... umm, maybe you're the automated machine :-P
      good obfuscation though!


      perl -Te 'print map { chr((ord)-((10,20,2,7)[$i++])) } split //,"turo"'