Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re^3: Optimizing I/O intensive subroutine

by BrowserUk (Pope)
on Oct 27, 2012 at 00:07 UTC ( #1001145=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    C:\test>dir junk47.dat.*
    26/10/2012  17:04        16,266,705 junk47.dat.1
    ...
    my $start = time;
    my( $n, $t, @l ) = process_flist( 'junk47.dat', $L ) for map "junk47.d
    +at.$_", 1.. $N;
    printf "%.3f\n", time() - $start;
    
  2. or download this
    C:\test>junk47 -N=100 -L=20
    147.615
    

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (6)
As of 2014-09-17 23:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (100 votes), past polls