diff options
| author | Mohammad S Anwar <Mohammad.Anwar@yahoo.com> | 2019-08-13 11:54:35 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2019-08-13 11:54:35 +0100 |
| commit | 0aeaabe51233d3c904da3488656fc67abbe574fc (patch) | |
| tree | f61cf5b33882a9ed1a2c94bdf33b7b33522911fc | |
| parent | c9168b0d20f61dbadbfd36760a406580084c62c8 (diff) | |
| parent | 28a44cbc4f8b534e194ea96190c88eeaa6dc44fe (diff) | |
| download | perlweeklychallenge-club-0aeaabe51233d3c904da3488656fc67abbe574fc.tar.gz perlweeklychallenge-club-0aeaabe51233d3c904da3488656fc67abbe574fc.tar.bz2 perlweeklychallenge-club-0aeaabe51233d3c904da3488656fc67abbe574fc.zip | |
Merge pull request #510 from oWnOIzRi/week021
add comment- not very accurate
| -rw-r--r-- | challenge-021/steven-wilson/perl5/ch-01.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/challenge-021/steven-wilson/perl5/ch-01.pl b/challenge-021/steven-wilson/perl5/ch-01.pl index a985076177..7e92b02b9d 100644 --- a/challenge-021/steven-wilson/perl5/ch-01.pl +++ b/challenge-021/steven-wilson/perl5/ch-01.pl @@ -28,5 +28,6 @@ while ( $e != $previous_e ) { $e += ( 1 / $factorial ); } -my $dp = 50; +# This is only accurate to 15 decimal places, oops. +my $dp = 15; say "value of e to $dp decimal places: ", $e->fround($dp); |