$ perl -E'say sprintf("%.18f",0.125)' 0.125000000000000000 $ perl -E'say sprintf("%.18f",0.25)' 0.250000000000000000