From 28a44cbc4f8b534e194ea96190c88eeaa6dc44fe Mon Sep 17 00:00:00 2001 From: Steven Wilson Date: Mon, 12 Aug 2019 16:52:33 +0100 Subject: add comment- not very accurate --- challenge-021/steven-wilson/perl5/ch-01.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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); -- cgit