我是 Perl 新手,目前的任务是整理和维护一个庞大且非常混乱的 Perl 项目。我正在使用 perl-critic 来帮助我检测代码中的问题(并教我最佳实践)。
现有代码中有编码人员创建了无法访问的代码的地方。例如,他们添加了 '&& 0' 作为注释掉一些代码分支的懒惰方式:
if ($req->param('donut') && 0) {
unreachable code...
} else {
always branches to here...
}
我希望 perl 或 Critic 会在这种情况下警告我有关无法访问的代码(条件具有评估为 false 的常量值),但事实并非如此。
有没有我可以使用的工具或脚本可以可靠地检测到这种事情?
显然,我可以在源代码中搜索 '&& 0',但是除了将 '&& 0' 附加到 if 语句之外,编码器还可以通过多种方式创建无法访问的代码。