Perl：：Critic： 使用 -w 时"Code before warnings are enabled"

Question

我从Perl：：Critic获得"启用警告前的代码"，即使我在shebang中指定了-w

#！/usr/bin/perl -w

我真的不想经历并替换所有实例。我能做些什么吗？此外，我确实希望Perl::Critic确保所有Perl都启用了警告。

Answer 1

你说perlcritic不做你想做的事，但你希望它做你想做的事。因此，您将需要修改perlcritic，或者更具体地说，Perl：： Critic：： Policy：： TestingAndDebugging：： RequireUseWarnings。接受更改应该没有问题，因为缺少 shebang 解析在文档中被列为错误。

---

编辑文件可能更简单。机械地这样做是相当微不足道的。假设您已经在使用use strict;，

find -type f ( -name '*.pl' -o -name '*.pm' ) ! -name '*~' -exec 
   perl -i~ -0777pe's/^(s*)use strictb.*nK/${1}use warnings;n/mg' {} +