perl -e 'our $sum;for(1..1000000){$sum+=0.00000001};printf "%1.20f\n", $sum' 0.00999999999994859168