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.