Perl：显示使用过的子例程

在一些项目（Mason）中有很多perl模块（>200）。实际使用此代码中的5-10%。

---

如何查看，使用了（或未使用）哪些子例程？

除了choroba的链接外，您还可以使用探查器显示调用了哪些子例程（调用了多少次和多长时间）：

---

考虑从命令行开始使用

Perl:：Critic

：

perlcritic --single-policy=UnusedPrivateSubroutines --verbose 2 ./*.pl

您将得到一个未使用的子例程列表。要列出未使用的变量，请执行以下操作：

perlcritic --single-policy=UnusedVariables --verbose 2 /root/*.pl

要审核整个“mason”项目中未使用的子例程，请执行以下操作

cat *.pl > all-perl-files.pl

在

所有perl文件.pl

上再次使用

percritic

可能会给出一个初始列表。这是因为，如果同一子例程的名称在多个文件中声明并在项目中的某个位置使用，它可能会从未使用列表中屏蔽出来。

这对您有帮助吗？