$ perl -le '$foo = 11.3700000000000016; print $foo' 11.37 $ perl -le '$foo = .00000000000016; print $foo' 1.6e-13 $ perl -le '$foo = 1.00000000000016; print $foo' 1.00000000000016 $ perl -le '$foo = 1.3700000000000016; print $foo' 1.37 $ perl -le '$foo = 1.370000000000016; print $foo' 1.37000000000002 $ perl -le '$foo = .370000000000016; print $foo' 0.370000000000016