$ perl -e 'printf "%.10f\n%.30f\n", 3010*1.15, 3010*1.15'
3461.5000000000
3461.499999999999545252649113535881