Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: High Performance Game of Life

by eyepopslikeamosquito (Chancellor)
on Aug 12, 2017 at 07:15 UTC ( #1197294=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    join ':', $x - 1, $y - 1
    join ':', @_
    
  2. or download this
    pack 'ii', $x - 1, $y - 1
    pack 'ii', @_
    
  3. or download this
    > perl -MO=Terse -e "split /:/, $z"
    LISTOP (0x2bf88f8) leave [1]
    ...
            SVOP (0x645ad0) const [4] PV (0x640a80) "ii"
            UNOP (0x645a50) rv2av [2]
                PADOP (0x645a90) gv  GV (0xffb2c8) *_
    
  4. or download this
    for my $r ( [-123456789, 987654321], [1,2] ) {
       my $pp = pack 'ii', @{$r};
    ...
       $xjj == $r->[0] or die;
       $yjj == $r->[1] or die;
    }
    
  5. or download this
    -123456789:987654321 packlen=8 joinlen=20
    1:2 packlen=8 joinlen=3
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1197294]
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (6)
As of 2017-10-17 06:05 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My fridge is mostly full of:

















    Results (218 votes). Check out past polls.

    Notices?