$ perl -le'print cos(100000000)' -0.363385089355691 $ perl -e'printf "%.16g\n", cos(100000000)' -0.3633850893556905