Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic

Re: Japhaholic

by BooK (Curate)
on Feb 09, 2001 at 15:40 UTC ( #57369=note: print w/replies, xml ) Need Help??

in reply to Japhaholic

You call this obfuscation?

You make not use of context, you explicitely use $_, @_, you never even try to hide something... It's so clear, you just read it and understand the whole thing!

I showed it to a non-Perl programmer, explaining what split, etc did... I mean, we didn't even need to run the stuff to know what it did and how!

Having all lines of the same length is not enough to qualify, in my view... Except if you lines are 4 characters long.

Update: So that people stop downvoting me, here my shorter (but not more obfuscated) version:

print+map{pack'H*' ,$_}('4a7573742041 6e6f74686572205065 726c204861636b6572 0a0d'=~m/(..)/g)

It doesn't read its own source code, makes use of the fact that . doesn't match newlines, chains everything in one statement, etc...

Replies are listed 'Best First'.
Re: Re: Japhaholic
by dsb (Chaplain) on Feb 09, 2001 at 19:09 UTC
    Tell me how you really feel why don't you. :) - kel -

Log In?

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

How do I use this?Last hourOther CB clients
Other Users?
Others having an uproarious good time at the Monastery: (6)
As of 2023-12-09 21:13 GMT
Find Nodes?
    Voting Booth?
    What's your preferred 'use VERSION' for new CPAN modules in 2023?

    Results (38 votes). Check out past polls.