perl不一致的负零结果

我有以下代码：

my $m=0;
my $e =0 ;
my $g=0;

my $x=  sprintf( "%0.1f",(0.6*$m+ 0.7 * $e-1.5)*$g);

print $x;

当我运行脚本时,结果是-0.0而不是0.0有人可以解释为什么以及如何将其更改为0.0.

解决方法

首先,这与Perl无关.这是你的处理器返回-0.0.你会在其他语言中看到同样的行为.

你问为什么,大概问为什么这是有用的.老实说,我不知道.一些科学家和工程师可能会利用它.

0.0表示“零或正面稍微大一些”.

-0.0表示“零或者在负面上稍微大一点的东西”.

你也问如何摆脱这个标志.

负零是假的,所以$x || 0诀窍.