I am in awe. I spent the entire afternoon figuring this one out and all I can say is "Wow".

I do have a few questions, if you don't mind.

1) I understand that

0123 =~ m #\d+#
$8.$;
[download]

is a NO-OP. I just don't understand how. I'm also assuming that the eval() right afterwards puts a semi-colon in right before, but I'm not sure why.

2) How on earth did you get the crypt function to work the way you wanted it to?? Was it just random luck or did you brute force a whole bunch of possibilities until you got the ones you wanted?

3) Why did you have to quote the No Using Deparse tr when using 'y'? Once I got it into tr///, it worked just fine, but leaving it in y/// didn't.

If I could ++ this again, I would. I learned a ton from it. Thank you!

---

---

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:

  <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>

• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or How to display code and escape characters are good places to start.