--- Jason Frisvold <[EMAIL PROTECTED]> wrote:
> Does anyone know if there is a Perl Profiler (Open Source or Commercial)
> that is in existance?  Apparently my boss thinks this will magically fix
> various issues...  :)

Perl has many tools for this.  However, profiling tools are generally used to determine
performance issues.  If performance is not a problem, they're not terribly relevant.  
Assuming
that performance *is* a problem, here's a general strategy.

Use Devel::Dprof

This module allows you to know the execution time of a script and its subroutines.  
Read 'perldoc
Devel::Dprof' and http://perlmonks.org/index.pl?node_id=101786 for more information.

When you have determined where you might get the most performance enhancements, you 
can switch to
Devel::SmallProf to measure performance on a line-by-line basis.

Finally, when determining what code changes will gain you maximum benefit, using the 
Benchmark
module will allow you to concretely demonstrate what *really* works.  For some good 
information on
using Benchmark, see http://perlmonks.org/index.pl?node_id=8745

Cheers,
Ovid

=====
"Ovid" on http://www.perlmonks.org/
Someone asked me how to count to 10 in Perl:
push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//;
shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print $_,$/for reverse @A

__________________________________________________
Do you Yahoo!?
Faith Hill - Exclusive Performances, Videos & More
http://faith.yahoo.com

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to