Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

(jeffa) Re: 1001 JAPHs

by jeffa (Bishop)
on Jun 22, 2001 at 02:23 UTC ( [id://90565]=note: print w/replies, xml ) Need Help??


in reply to 1001 JAPHs

Watch out marcink, you'll get sued for eye damage, like Steve Martin in The Jerk. 8P

For those new to obfuscation, try this little trick:

  • first, comment out the 3rd line: #my $japh;
  • next, add 'my' to the 5th to last line: my $japh="Just Another Perl Hacker";
Nice work!

Jeff

R-R-R--R-R-R--R-R-R--R-R-R--R-R-R--
L-L--L-L--L-L--L-L--L-L--L-L--L-L--

Replies are listed 'Best First'.
(marcink) Re^2: 1001 JAPHs
by marcink (Monk) on Jun 22, 2001 at 19:17 UTC
    For those new to obfuscation, try this little trick:

    Spoilsport ;-)

    Actually, the obfuscation here is not very complicated. I don't even know whether this thing qualifies as an obfu. I mean, it's hard to read, but there is just enough mangling to hide 5 or 6 keywords to protect the guilty of abusing a little known Perl feature to make it do the job... then again, that looks like a pretty generic description of quite a number of obfus ;-)

    The thing I like about this particular piece of code is that I learned one more obscure Perl detail that makes me really, really afraid I might at some time be forced to actually use it.



    -marcink

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://90565]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others goofing around in the Monastery: (5)
As of 2024-04-19 07:09 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found