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

Re: Speed up perl code

by Anonymous Monk
on Sep 21, 2012 at 07:18 UTC ( #994827=note: print w/ replies, xml ) Need Help??


in reply to Speed up perl code

You're wrote  decode( 'cp1252' entirely too many times (131 versus 24 unique, that is 107 duplicates )

Multiply that by the number of iterations through the 42 odd loops, and no wonder its slow

Also, there are way too many levels of indentation -- longest is 13 deep -- you should turn each for loop into a function call , really


Comment on Re: Speed up perl code
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (7)
As of 2014-08-30 03:58 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (291 votes), past polls