Re: Principles of obfuscation?

I think the best obfuscations come from finding a bizarre feature of perl that either looks differently or acts differently then you would expect. For example, an obfu by Abigail (as I recall) Basically looked like this:

$;
={just=>another=>perl=>hacker}
;
$"=$/;
print %$;
[download]

Or something to that affect, taking advantage of the $; variable.

Comment on Re: Principles of obfuscation? Download Code

Replies are listed 'Best First'.
Re: Re: Principles of obfuscation? by muba (Priest) on Apr 03, 2004 at 22:34 UTC
Almost right. It indeed is Abigail's, but the obfu looks slightly different. perlman:perlfaq/perlman:perlfaq1/What is a JAPH? points to http://www.perl.com/CPAN/misc/japh and that one shows us: `$; # A lone dollar? =$"; # Pod? $; # The return of the lone dollar? {Just=>another=>Perl=>Hacker=>} # Bare block? =$/; # More pod? print%; # No right operand for %?` [download] Besides, jeffa /msged me that this code can also be found on PerlMonks :)	[reply] [d/l]

Replies are listed 'Best First'.

Re: Re: Principles of obfuscation?
by muba (Priest) on Apr 03, 2004 at 22:34 UTC

http://www.perl.com/CPAN/misc/japh

$;                                   # A lone dollar?
=$";                                 # Pod?
$;                                   # The return of the lone dollar?
{Just=>another=>Perl=>Hacker=>}      # Bare block?
=$/;                                 # More pod?
print%;                              # No right operand for %?
[download]

jeffa

this code

[reply]
[d/l]