There are a few ways to do it to include profiling (as already stated). brian d foy has an article is DDJ (Dr. Dobbs Jornal) www.ddj.com about profiling that I have found to be extremely useful in getting me going: http://www.ddj.com/184404580. He uses a profiling module called Devel::SmallProf. It might also be handy to use the faster version of this Devel::FastProf.

$ perl -d:FastProf myscript.pl
$ fprofpp fastprof.out > fast_profiler_report.txt
[download]

If you are looking for something with a little less information, you can always Benchmark your code.

# Benchmark
use Benchmark;
my @_t;

$_t[1] = new Benchmark;

# module/program/subroutine goes here

$_t[2] = new Benchmark;
$_t[0] = timediff($_t[2], $_t[1]);
print "$0 took: ". timestr($_t[0]);
[download]

Eric