Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Ceci n'est pas un obfu

by FoxtrotUniform (Prior)
on Aug 08, 2002 at 02:11 UTC ( [id://188504]=obfuscated: print w/replies, xml ) Need Help??

Title says it all, really. This is my first serious (deliberate :-) attempt at obfuscation, and seems awfully weak and transparent compared to some of the masterworks on this site. Then again, maybe all obfus seem transparent to their authors....

#! /usr/bin/perl -w use strict; $a='Just' ; $b='another';$a=~ y{stuJ}{ciec} ;undef $_;$\="hacker, ";my$magritte = pack q\C4 \, split /,/, qq; 80, 101 , 114, 108; ; $a.=q;_;;$.= $\;$\=~s!.*$! $.=~y`ahr,eck `nupha j\n`,$. !sme;$b=~y/t ronahe/sPxte'n /;$_=$a.$b; $_.=join '', map {chr($_/2)} map{ord} split'',$magritte ^(join '', map{chr}qw{238 133 176 138});$\=' '.$\ ;s; ;;g;y;_; ;;chomp $\;print;

Tested under FreeBSD 4.5-RELEASE and Perl 5.005_03, and Linux (mongrel) and Perl 5.6.1. Copy-pasting from the preview page seemed to mangle the code (by inserting two leading spaces on each line below the shebang); be warned. (Downloading the code explicitly seems to work fine, tho.) Suggestions always welcome, especially since I'm new to the obfuscation game and could use the help.

The work this is based on is Magritte's "pipe", with a bit of help from Gödel, Escher, Bach by Douglas Hofstadter. Most of you will recognize both, I'm sure. If not, there's always Google :-P

--
F o x t r o t U n i f o r m
Found a typo in this node? /msg me

Replies are listed 'Best First'.
Re: Ceci n'est pas un obfu
by Massyn (Hermit) on Aug 09, 2002 at 05:43 UTC
    Tested under ActiveState Perl 5.6.1 (Build 633).. Nicely done!
Re: Ceci n'est pas un obfu
by astaines (Curate) on Aug 09, 2002 at 16:50 UTC

    Works well on windows NT with Active-State 5.6.1 build 628. Very cute!

    -- Anthony Staines
      Works just fine on Cygwin as well! Excellent work! Upvote for that.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: obfuscated [id://188504]
Approved by dws
Front-paged by jarich
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others sharing their wisdom with the Monastery: (5)
As of 2024-03-28 13:03 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found