aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMohammad S Anwar <Mohammad.Anwar@yahoo.com>2022-07-03 18:41:49 +0100
committerGitHub <noreply@github.com>2022-07-03 18:41:49 +0100
commitedd8cc4cf46607453f87a3bd576325f502c77974 (patch)
tree423618da8603d010f922053fd3824590c22e2cb0
parentb8e39623062ce5d36e892850b407dcfa2e68eea9 (diff)
parent77e6a645a0035baf6994f214eb1aa86f62ab433d (diff)
downloadperlweeklychallenge-club-edd8cc4cf46607453f87a3bd576325f502c77974.tar.gz
perlweeklychallenge-club-edd8cc4cf46607453f87a3bd576325f502c77974.tar.bz2
perlweeklychallenge-club-edd8cc4cf46607453f87a3bd576325f502c77974.zip
Merge pull request #6379 from andemark/branch-for-challenge-171
ch-1.raku
-rw-r--r--challenge-171/mark-anderson/raku/ch-1.raku4
1 files changed, 4 insertions, 0 deletions
diff --git a/challenge-171/mark-anderson/raku/ch-1.raku b/challenge-171/mark-anderson/raku/ch-1.raku
new file mode 100644
index 0000000000..52387ad5b3
--- /dev/null
+++ b/challenge-171/mark-anderson/raku/ch-1.raku
@@ -0,0 +1,4 @@
+#!/usr/bin/env raku
+use Prime::Factor;
+
+say (1,3...*).hyper.grep({ $^n < [+] proper-divisors($^n) }).head(20);