$ perl -e 'print .1 + .2 - .3, "\n"'
5.55111512312578e-17

##</code><code>##

> say .1 + .2 - .3
0