Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

Re: Sloooooow algo in Perl

by ambs (Pilgrim)
on Mar 26, 2005 at 15:10 UTC ( #442495=note: print w/replies, xml ) Need Help??

in reply to Sloooooow algo in Perl

Looking to your code, you don't have nothing I can say: LOOK THERE! IT'S SLOW! Unfortunately. This way can't help you much.

First questions... what is the magnitude order for your @a? Also, your @delta = @sigma = @sigmainit is not efficient if these are big arrays. Also, I can't see where @sigmainit come from.

Also, in your foreach, if @{$p$w} is a big array, a while look is faster.

Hope this all helps you a bit. But It's hard to look to your algorithm without more information and understand what it should do.

Alberto Simões

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (5)
As of 2021-10-17 13:24 GMT
Find Nodes?
    Voting Booth?
    My first memorable Perl project was:

    Results (71 votes). Check out past polls.