The Devel::CallStack module records the callstacks of subroutines:
how many times each callstack was invoked.