Help for this page

Select Code to Download


  1. or download this
    $ time ./perl6 -e 'my $s; for 1..10000 {$s+=1e0/$_**2};say $s'
    1.64483407184807
    real    0m1.659s
    user    0m1.360s
    sys     0m0.200s
    
  2. or download this
    $ time ./perl6 -e 'my $s; for 1..1000 {$s+=1/$_**2};say $s'
    1.64393456668156
    ...
    real    0m1.341s
    user    0m1.240s
    sys     0m0.096s