$  perl -E 'say  .3 - .2 - .1;'
-2.77555756156289e-17