Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Vec JAPH

by trizen (Hermit)
on Dec 20, 2011 at 04:07 UTC ( #944330=obfuscated: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    $_ = [
            74, 116, 113, 113,
            28,  92, 104, 104,
    ...
    
    {vec(${print${$j},$/;$j},$i++
    ,8)=$$_[$i]+$i;$$_[$i]&&redo}
    
  2. or download this
    $_=[$j=#];
              101,  98, 102, 108, 28,
               69, 111, 108, 108, 23,
    ...
    $i=$j-$j];
    
    {vec($j,$i++,8)=$$_[$i]+$i;$$_[$i]&&redo||`$j`}
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://944330]
Front-paged by keszler
help
Chatterbox?
[hippo]: P6?
[Eily]: hippo I read that as perl 6, though I don't know how Hi in perl 6 differs from the same in perl 5 :P

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (9)
As of 2017-05-23 15:09 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?