Perl Monk, Perl Meditation | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
I originally had this working in only 54 characters, but it seemed too obvious.
It runs both in Linux ("perl <script>") and in Windows (but use a "cmd" shell so you can see the output). If you like the results, don't "peek" at how it's done yet ... try running it with the '4' changed to a '1', and it becomes all lowercase! ... Finally, change the string '"(.u.{22});' near the end of the line to 'th\.(.{17});m', and I think you'll truly be surprised:
Update: What am I thinking?!! I forgot the most important person of all:
Update: ambrus pointed out that he had already created an obfuscation based on this method. Sorry about that, ambrus! In reply to Opere Citato Japh by liverpole
|
|