Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Re^4: Optimizing with Caching vs. Parallelizing (MCE::Map) (Updated)

by 1nickt (Abbot)
on Apr 06, 2020 at 18:49 UTC ( #11115141=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use warnings; use strict; use feature 'say';
    use MCE::Util;
    ...
    }, 1, 1e6;
    
    say "@$_" for reverse +(sort { $b->[1] <=> $a->[1] } @sizes)[0..19];
    
  2. or download this
    $ time perl ch-map.pl
    922525 445
    ...
    real    0m4.843s
    user    0m47.423s
    sys    0m0.265s
    
  3. or download this
    time perl ch-flow.pl
    
    ...
    real    0m4.661s
    user    0m47.057s
    sys    0m0.255s
    

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (3)
As of 2021-01-25 04:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?