Select Code to Download

C:\_32\pscrpt\math-mpfr>perl sum.pl
0 5e-1
...
7.853981633974483096156608458198765e-1
Sum * 4 =
3.141592653589793238462643383279506

use strict;
use warnings;
...
}

print "\nSum =\n$check\nSum * 4 =\n", $check * 4, "\n";