aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorholli-holzer <holli.holzer@gmail.com>2019-12-30 13:59:01 +0100
committerholli-holzer <holli.holzer@gmail.com>2019-12-30 13:59:01 +0100
commit34f1f1b033d76b957ddc508fdc480518c31c95d9 (patch)
tree24f2e244a6abbcab1a0475805ffe3264257ef832
parent0fe1486e3dd54642f7f02f9a4587c523d0a0b6bb (diff)
downloadperlweeklychallenge-club-34f1f1b033d76b957ddc508fdc480518c31c95d9.tar.gz
perlweeklychallenge-club-34f1f1b033d76b957ddc508fdc480518c31c95d9.tar.bz2
perlweeklychallenge-club-34f1f1b033d76b957ddc508fdc480518c31c95d9.zip
Solutions Markus Holzer
-rw-r--r--challenge-041/markus-holzer/perl6/ch-1.pl62
-rw-r--r--challenge-041/markus-holzer/perl6/ch-2.pl61
2 files changed, 3 insertions, 0 deletions
diff --git a/challenge-041/markus-holzer/perl6/ch-1.pl6 b/challenge-041/markus-holzer/perl6/ch-1.pl6
new file mode 100644
index 0000000000..ab0a5739b9
--- /dev/null
+++ b/challenge-041/markus-holzer/perl6/ch-1.pl6
@@ -0,0 +1,2 @@
+use Prime::Factor;
+.say for (2..50).grep( -> $n { is-prime prime-factors( $n ).elems }); \ No newline at end of file
diff --git a/challenge-041/markus-holzer/perl6/ch-2.pl6 b/challenge-041/markus-holzer/perl6/ch-2.pl6
new file mode 100644
index 0000000000..377434d950
--- /dev/null
+++ b/challenge-041/markus-holzer/perl6/ch-2.pl6
@@ -0,0 +1 @@
+.say for (1, 1, * + * + 1 ... *)[^20];