Perl模运算符问题

Question

为什么第一个示例打印出错误的结果？

perl -le 'print $x = 100*1.15 % 5' 
4 
perl -le 'print $x = 1000*1.15 % 5' 
0 

Answer 1

这是因为浮点运算的。

print $x = int(100*1.15); 

给你114

Answer 2

四舍五入。请记住，计算机不能完美表示实际的小数位数 - 它们近似。在我的电脑上，perl -le 'print $x = (100*1.15)-115'给出结果-1.4210854715202e-14，这意味着100*1.15差不多是115，而不是115.