我不能为我的生活弄清楚为什么以下产生它的结果.
use POSIX;
my $g = 6.65;
my $t = $g * 4;
my $r = $t - $g;
my $n = $r / $g;
my $c = ceil($n);
print "$c ($n)\n";
Run Code Online (Sandbox Code Playgroud)
Sigil-tastic,我知道 - 抱歉.
我已经为我的应用解决了这个问题,如下所示:
use POSIX;
my $g = 6.65;
my $t = $g * 4;
my $r = $t - $g;
my $n = $r / $g;
my $c = ceil("$n");
print "$c ($n)\n";
Run Code Online (Sandbox Code Playgroud)
......但我很困惑为什么这里有必要.