如何使用Perl:：Critic:：Policy:：ValuesAndExpressions:：ProHibitMagicNumber

我想使用模块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:：批评家；
打开（my$文件，“new（）；
my@violations=$批评家->批评（$FILE）；
打印@违规；
关闭（$文件）；

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

如果我使用Perl:：Critic:：Policy:：ValuesAndExpressions:：ProHibitMagicNumber，我会得到错误

---

无法通过包“Perl:：Critic”找到对象方法“new”

Perl:：Critic解析Perl，而不是C