perlcritic在以下代码的第一行eval中抱怨“eval”[BuiltinFunctions::ProhibitStringyEval] 的表达式形式:
use strict;
use warnings;
use feature qw/say/;
my $hasTwitter = 1;
my $validEmail = 0;
my $rule = '${hasTwitter} | ${validEmail}';
my $result = eval $rule;
say "Result -> $result";
$result = eval { $rule };
say "Result -> $result";
我尝试使用 eval {} 来修复 perlCritic 但它没有返回预期的结果。
回应是:
Result -> 1
Result -> ${hasTwitter} | ${validEmail}
是否有使用字符串插值的解决方法?这个想法是在配置文件上有一组规则,让代码读取和评估它们。
谢谢