Perhaps B::Xref or another of the B:: modules. The problem is that due to the dynamic nature of Perl you can't really guarantee that you can get the whole calling sequence even accounting for things like conditionals(e.g. calling methods determined by the contents of a scalar, $foo->$some_method( @args )). B::Xref may at least get you a start of the picture you're interested in.