perl - Perl：显示使用的子例程

Question

在某些项目（ Mason ）中有很多 perl 模块（> 200）。真正使用了这段代码的 5-10%。我怎么看，哪些子程序被使用（或未使用）？

Answer 1

除了 choroba 的链接，您还可以使用分析器来显示调用了哪些子例程（调用了多少次以及花费了多长时间）：

• 分析 Perl
• Devel::NYTProf - 分析 Perl 代码

Answer 2

Perl::Critic考虑从命令行开始使用：

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

您将获得未使用子例程的列表。列出未使用的变量：

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

为未使用的子例程审核整个“石匠”项目，例如

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

并再次使用percritic可能all-perl-files.pl 会给您一个初始列表。那是因为如果同一个子程序的名称在多个文件中声明并在您的项目中的某个地方使用，它可能会从您的未使用列表中被屏蔽。