There are a few modules out there that may help you. Take a look at these:

• Devel::TraceMethods - Devel::TraceMethods - Perl module for tracing module calls
• Devel::SmallProf -Devel::SmallProf - per-line Perl profiler

- Moon