Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

Username using most of perl's list functions

by mlh2003 (Scribe)
on Feb 15, 2005 at 23:07 UTC ( #431378=obfuscated: print w/replies, xml ) Need Help??

My first obfuscated code posting at the Monastery...

Just a 1-liner that uses most of perls list functions (as listed in perlfunc's 'Perl Functions by Category') to print out a simple name :)

print join'',(reverse sort map{/\d([a-z])\d/}split/\W/,'$5l6@314&60f%3 +h4#moo^1m2'),(map{/\d(\d)/}grep/\w\d/,reverse split/\W/,'a2&2b#9i*30% +42'),(unpack"AA",(chr(0b110000).chr(0b110011)));

Replies are listed 'Best First'.
Re: Username using most of perl's list functions
by Animator (Hermit) on Feb 16, 2005 at 19:57 UTC

    You can use the oct function aswell.

    You can replace the last chr(0b110011)with: chr oct q q0b110011q;

    Can you update your post and use code tags instead of pre tags (since you are messing up the layout...)? (fixed)

      Thanks Animator. I have fixed the formatting as suggested. I did have that code wrapped between code tags, although they were on the same line as the code - so for some reason it didn't format it correctly.

      After putting those tags on a line by themselves it came good ;)

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (3)
As of 2021-12-03 12:38 GMT
Find Nodes?
    Voting Booth?
    R or B?

    Results (29 votes). Check out past polls.