You may want to look at Devel::NYTProf, see Devel::NYTProf v2 - A major advance in perl profilers for further links and information.

Hope this helps,

Martin