Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"

Well commented obfuscation:

by Dog and Pony (Priest)
on Feb 17, 2002 at 15:40 UTC ( [id://145999] : obfuscated . print w/replies, xml ) Need Help??

Here we have a piece of seriusly injured code, thank heavens we have the comments so we can repair it!
#!/usr/bin/perl -w use strict; $_ = "A silly obfuscation:"; # Something to start with. $ # A buck for your thoughts? 0=0 # Yes, obviusly it is... ;$ # Got it backwards? _="utaohrpr akr"; # Special variable, filled with gib +berish? map # Sure could use one here. {$,.='$'.++$0.$_} # Anonymous Hash? split # I'm about to... '' # An empty string? ;$ # Again?! _= # The gibberich here? "Dog and Pony" # Hey, that is me! ;$"=" # Can you quote an assignment? Js nte elhce # Barewords allowed? ";$" # Interpolating backwards var? =~s # For my tilde POD? / + # \w* ?\w* ?\w* ?\w* ?\w*\?//g;# Division plus a match inside '#'s +? ;s # Oops, should be a dollar, not 's' +? /$_/ # Matches itself? $"/ # Unterminated String constant? ;s # Same mistake again? / + # \w* ?\w* ?\w* ?\w* ?\w*\?//g;# Vaguely familiar....? $0=".";$" # Program is now current dir and ou +r special var? =~ # Another, but empty tilde POD? s/($0)/($1)/g; # Replacing our program with itself +? eval("s/\n$\"/$,/"); # Always, always use an eval in an +obfu! :) print; # Now, what did we get...?
This is also my very first real try at something like this, so I am a bit anxious to hear what you all think?

Replies are listed 'Best First'.
Re: Well commented obfuscation:
by Darkling (Beadle) on Feb 18, 2002 at 17:14 UTC
    Hahaha. I actually found this quite funny. You don't see many attempts at obfu by using misleading comments.

    Thanks for a few moments relief from the tedium of existence.

Re: Well commented obfuscation:
by ProgrammingAce (Sexton) on Feb 28, 2002 at 02:40 UTC
    There is nothing like telling someone how you did something, while lieing to them the whole time. Nice job, it's always nice to see code with a sense of humor.

              - Ace
Re: Well commented obfuscation:
by giulienk (Curate) on Feb 18, 2002 at 08:34 UTC
    Well, the most appreciated node by the long gone Abigail use the same comment style: maybe you should give him some credit?