in reply to perl subtraction

It's because you don't understand how floating point works.

In Section Seekers of Perl Wisdom