我正在尝试使用算术来评估写为字符串的 a 函数:
#!/usr/bin/env perl
use strict;
use warnings FATAL => 'all';
use feature 'say';
use autodie ':default';
my $str = '0.203580063041053 * $x + -0.0273785448865449';
my $x = 3;
my $ans = eval $str;
say $ans;
上面的代码有效,并给出了正确的答案。
但是,perlcritic 说最好避免使用上述代码:Expression form of "eval" at line 10, column 11. See page 161 of PBP. (Severity: 5)
我已经阅读了 Perl 最佳实践的那部分,但它很长,我看不出它如何适用于我正在做的非常简单的情况。
那么评估函数的好方法是什么?