From a48c0065c6601150898fdd15f7efe61d0ee5fc75 Mon Sep 17 00:00:00 2001
From: Scimon <simon.proctor@gmail.com>
Date: Mon, 21 Jul 2025 10:34:15 +0100
Subject: Small update

---
 challenge-331/simon-proctor/raku/ch-2.raku | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/challenge-331/simon-proctor/raku/ch-2.raku b/challenge-331/simon-proctor/raku/ch-2.raku
index e34a3f4c8c..59336a52bb 100755
--- a/challenge-331/simon-proctor/raku/ch-2.raku
+++ b/challenge-331/simon-proctor/raku/ch-2.raku
@@ -11,8 +11,9 @@ multi sub infix:<buds> (Str() $source,
 multi sub infix:<buds> (Str() $source, Str() $target) {
     my @target = $target.comb.Array;
     my @check = $source.comb.Array;
-    for 0..^$target.codes -> $first {
-        for $first+1..^$target.codes -> $second {
+    my $last = $target.codes;
+    for 0..^$last -> $first {
+        for $first^..^$last -> $second {
             @check[$first,$second] = @check[$second,$first];
             return True if @check ~~ @target;
             @check[$first,$second] = @check[$second,$first];
-- 
cgit