From ae9118a503373d2c9793456b95e2eb3ac643df8b Mon Sep 17 00:00:00 2001
From: Luca Ferrari <fluca1978@gmail.com>
Date: Tue, 18 May 2021 09:01:45 +0200
Subject: Task 1 done

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

diff --git a/challenge-113/luca-ferrari/raku/ch-1.p6 b/challenge-113/luca-ferrari/raku/ch-1.p6
new file mode 100644
index 0000000000..f47a511d54
--- /dev/null
+++ b/challenge-113/luca-ferrari/raku/ch-1.p6
@@ -0,0 +1,10 @@
+#!raku
+
+sub MAIN( Int $N where { $N > 0 },
+          Int $D where { $D >= 0 && $D.Str.chars == 1 } ) {
+    given (1 ..^ $N).grep( * ~~ / $D /).sum {
+        when $N { '1'.say }
+        default { '0'.say }
+    }
+    
+}
-- 
cgit