--- 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]