perl - 为什么 Perl 的 floor 函数减 1？

Question

Perl 的 floor 函数给了我意想不到的结果。

floor(13320) = 13320，但是 floor(133.20 * 100) = 13319。我认为这两者都会得到相同的结果。为什么会这样？

use POSIX;

print floor(133.20);       # 133, as expected
print floor(13320);        # 13320, as expected
print floor(133.20 * 100); # 13319?

标签： perlfloor