UBB.Developers Forums General Discussion Chit Chat Obfuscated perl challenge #2

This contest open to everyone, including Mark and Charles


Explain how this code works.

I bet it takes .00003 cents out of every transaction completed in tne New York Stock Exchange, and then sends that money into an offshore holding account in the Caymans that only I know the twenty-seven digit password to.

---Skorpion

Aha! But I have also figured out the twenty-seven digit password! And Im getting rich! rich! rich!

***dances about, chanting "Can't fool me Im the gingerbread man!"***

from a very quick look I see the q* *; and q! !; so those combined with the evals lead to the actual perl code for print "Just another Perl hacker" being constructed within. then evaling on the completed string issues the print.

I don't have time do decipher the actual statement construction right now, but looks like you put a lot of effort into it.

--mark

i'll come up with part 3 tommorow.

You have the general idea, Mark. Actually, it took a little more than an hour to write.

That last eval is only there because I wanted to break the program into separate lines - avoiding the wide UBB display annoyance. I had to escape all the backslashes between q* and *; because of that.

I made a program to create the encrypted message. First used sprintf to convert the "Yet another..." message to octal. Tacked the string "print eval" in front of that (with a little trick to get eval to work properly), then used sprintf again to convert that string to octal. Then used the y/// thingy to turn the octal representation to punctuation charaters. From there, it was pretty simple to add the decryption stuff.

I'll post the encryption and test code if anyone wants to see it.

The hard part was figuring when to escape and when not to escape.

Phew! It amazes me how you people can come up with such complicated code! My general knowledge is with PHP, so I honestly wouldn't have a clue as to how you did that or deciphered it.

Cool though, all the same.