有没有办法我可以访问(打印输出)一个子模块的列表到任意深度的子调用在Perl脚本中的当前位置之前？
我需要更改一些Perl模块(.pm的)。工作流从网页通过cgi脚本启动，将输入传递到在需要使用数据的模块中结束的多个模块/对象。在沿线的某处，数据变了，我需要找出在哪里。
解决方法
你可以使用
Devel::StackTrace。
use Devel::StackTrace; my $trace = Devel::StackTrace->new; print $trace->as_string; # like carp
它的行为像鲤鱼的痕迹，但你可以得到更多的控制框架。
一个问题是引用被字符串化，如果引用的值改变，你将不会看到它。然而，你可以打开一些东西与PadWalker打印出完整的数据(这将是巨大的，虽然)。