From 3bbb49913ae8c0c5ed4a863f77507cc3c4f4f372 Mon Sep 17 00:00:00 2001
From: Luca Ferrari <fluca1978@gmail.com>
Date: Thu, 17 Mar 2022 10:56:10 +0100
Subject: Task 1 done

---
 challenge-156/luca-ferrari/raku/ch-1.p6 | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 challenge-156/luca-ferrari/raku/ch-1.p6

diff --git a/challenge-156/luca-ferrari/raku/ch-1.p6 b/challenge-156/luca-ferrari/raku/ch-1.p6
new file mode 100644
index 0000000000..3b3bcc727a
--- /dev/null
+++ b/challenge-156/luca-ferrari/raku/ch-1.p6
@@ -0,0 +1,11 @@
+#!raku
+
+sub MAIN( Int $limit where { $limit > 0 } = 10 ) {
+    my @pernicious = lazy gather {
+	for 1 .. Inf {
+	    take $_ if $_.base( 2 ).comb.sum.is-prime;
+	}
+    };
+
+    @pernicious[ 0 .. $limit - 1 ].join( ', ' ).say;
+}
-- 
cgit