Bleh. POSIX::floor() on a Perl that uses "long double" (or similar) as NVs induces a great reduction in precision. Much better to just use:
sub floor { $_[0] < 0 ? -int(-$_[0]) : int($_[0]); }
sub floor { my $i= int( my $f= shift @_ ); return $i - ( $f<0 && $f!=$ +i ); }
Now you know. :)
- tye
In reply to Re^2: Best Material for Floors: (POSIX--)
by tye
in thread Best Material for Floors:
by Petruchio
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |