强制所有 Perl 脚本使用“use strict”运行

Question

我刚刚浏览了一个大型的遗留 Perl Web 应用程序（使用cgi-lib库并使用 Apache HTTPD 作为 CGI 运行）并将每个脚本更新为use strict;，在此过程中修复了许多小错误。现在完成了，我想阻止人们关闭strict模式。我有什么办法可以强制执行吗？（我们以前遇到过这个问题，当时use strict;用注释“不起作用”来注释掉。）

Answer 1

良好的代码审查流程和关心代码审查流程的人是无可替代的。通过将严格纳入模板来使其成为默认设置，应该像版权标题一样自动。文件问题。如果问题的优先级较低，则很好，但当涉及相关代码时，应该在某个时候处理。如果关闭，则需要比“不起作用”更好的文档。

当人们同意这个标准后，就强制执行。把它放在工具中显眼的地方，比如 lint 或 tidy 配置、CI 构建检查或版本控制系统预提交检查。

Answer 2

这岩石岩石工具有一个政策：RequireUseStrict。因此，您可以配置perlcritic扫描所有脚本文件，如果不遵守该策略则报告错误。

因此，您必须找到一种方法来定期启动 perlcritic 实用程序并报告其结果。持续集成 (CI) 服务就是为此目的而存在的。