如果在语句修饰符中声明变量，则发出警告

Question

我刚刚来到以下代码行：

my $foo = $bar if $cond;

我要解决此问题，因为它当然会导致subtle bugs。

是否有Perl，模块或编译指示的版本会在达到此类声明时发出警告？

现在，我将使用grep和PPI的组合来扫描代码库以解决所有这些问题。到目前为止共发现了102个。但是，如果他们添加新的无效行，则自动警告其他程序员的方法会有所帮助。

Answer 1

perlcritic中的Perl::Critic::Policy::Variables::ProhibitConditionalDeclarations政策警告这些结构。