> perl5 -E 'say 3e-1 - .3'
0