Merge pull request #2882 from stuart-little/stuart-little_089

1st commit on 089

2 files changed, 16 insertions, 0 deletions

diff --git a/challenge-089/stuart-little/raku/ch-1.p6 b/challenge-089/stuart-little/raku/ch-1.p6
new file mode 100755
index 0000000000..f4240b3b53
--- /dev/null
+++ b/challenge-089/stuart-little/raku/ch-1.p6
@@ -0,0 +1,6 @@
+#!/usr/bin/env perl6
+use v6;
+
+say (1..@*ARGS[0].Int).combinations(2).map({ $_[0] gcd $_[1] }).sum
+
+# run as <script> <number>
diff --git a/challenge-089/stuart-little/raku/ch-2.p6 b/challenge-089/stuart-little/raku/ch-2.p6
new file mode 100755
index 0000000000..fa8ec9f2a9
--- /dev/null
+++ b/challenge-089/stuart-little/raku/ch-2.p6
@@ -0,0 +1,10 @@
+#!/usr/bin/env perl6
+use v6;
+
+for [
+    [2,7,6],
+    [9,5,1],
+    [4,3,8]
+] {.say}
+
+# run as <script>