in reply to Perl code timing

I am currently working with a mod_perl handler written by Maverick. Inside his "engine", he pushes calls to Time::HiRes::time inside an array. After all processing is down, he reports that array in a format like so: 
Total Time: 0.143684983253479
----------------------------------------
0.00020  0.14% template dir resolution
0.01821 12.67% session attachment
0.00014  0.10% parameter parsing
0.00025  0.18% config section resolution
0.03901 27.15% handler for user/credit view
0.00010  0.07% result packing
0.00715  4.98% handler for skeleton handle
0.00012  0.08% result packing
0.00775  5.39% handler for status_widget handle
0.00004  0.03% result packing
0.05102 35.51% template open
0.00050  0.35% param packing
0.01122  7.81% skeleton open
0.00797  5.55% end
I haven't seen the code that generates the report, but basically all you do is find the delta times between each element in the array. Once you have those numbers and the total time, you can compute the percentage.

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)

In Section Seekers of Perl Wisdom