perl -e 'print 5.1 + 100005.2 - 100005.2'
5.09999999997672?


##</code><code>##

perl -e 'print 5.1 + ( 100005.2 -100005.2 )'           [12:36pm]
5.1

##</code><code>##

%perl -e ' printf "%f  %f \n", 0x186A5, ( 5.1 + 0x186A5 ) - 0x186A5'
100005.000000  5.100000