Select Code to Download

use strict;
use warnings;
...
  printf "%9d  %0.14f\n", $n, $pi / $n;
}

       10  3.14242598500110
      100  3.14160098692313
...
 10000000  3.14159265358979
100000000  3.14159265358979

use strict;
use warnings;
...
  printf "%9d  %0.14f\n", $n, $pi / $n;
}

       10  3.23992598890716
      100  3.15157598692313
...
 10000000  3.14159275358979
100000000  3.14159266358980