diff options
| author | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2020-08-07 02:47:17 +0100 |
|---|---|---|
| committer | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2020-08-07 02:47:17 +0100 |
| commit | a161746303a2fff336c645b57747cbf26862795c (patch) | |
| tree | 5a6ea953d601a9c413ed1bb4c4d29cf25a1eb236 /challenge-072/lance-wicks | |
| parent | dbedee823417e3c87914ca70d1ee3403a99666a2 (diff) | |
| download | perlweeklychallenge-club-a161746303a2fff336c645b57747cbf26862795c.tar.gz perlweeklychallenge-club-a161746303a2fff336c645b57747cbf26862795c.tar.bz2 perlweeklychallenge-club-a161746303a2fff336c645b57747cbf26862795c.zip | |
- Added solutions by Lance Wicks.
Diffstat (limited to 'challenge-072/lance-wicks')
| -rw-r--r-- | challenge-072/lance-wicks/blog.txt | 1 | ||||
| -rw-r--r-- | challenge-072/lance-wicks/perl/ch-1.pl | 13 |
2 files changed, 14 insertions, 0 deletions
diff --git a/challenge-072/lance-wicks/blog.txt b/challenge-072/lance-wicks/blog.txt new file mode 100644 index 0000000000..1c9bfe1898 --- /dev/null +++ b/challenge-072/lance-wicks/blog.txt @@ -0,0 +1 @@ +https://www.twitch.tv/videos/702391523 diff --git a/challenge-072/lance-wicks/perl/ch-1.pl b/challenge-072/lance-wicks/perl/ch-1.pl new file mode 100644 index 0000000000..5acdc0ca55 --- /dev/null +++ b/challenge-072/lance-wicks/perl/ch-1.pl @@ -0,0 +1,13 @@ +use strict; +use warnings; + +use lib './lib'; +use Trailing::Zeroes; + +my $N = $ARGV[0]; + +my $fz = Trailing::Zeroes->new; + +print "\n"; +print $fz->count($fz->factorial($N)); +print "\n"; |