我如何使用Perl :: Critic :: Policy :: ValuesAndExpressions :: ProhibitMagicNumbers

Question

我想使用模块Perl :: Critic :: Policy :: ValuesAndExpressions :: ProhibitMagicNumbers来检查.C文件中的幻数

use strict;
use warnings;
use Perl::Critic;

open(my $FILE, "< test.c") or die $!;
my $critic = Perl::Critic->new(); 
my @violations = $critic->critique($FILE);
print @violations;

close($FILE);

如果我使用Perl :: Critic,我得到错误无法解析代码:解析Perl文档时出现未知错误

如果我使用Perl :: Critic :: Policy :: ValuesAndExpressions :: ProhibitMagicNumbers,我得到错误无法通过包"Perl :: Critic"找到对象方法"new"

Answer 1

Perl :: Critic解析Perl,而不是C.