ch-2.raku

1 files changed, 4 insertions, 5 deletions

diff --git a/challenge-124/mark-anderson/raku/ch-2.raku b/challenge-124/mark-anderson/raku/ch-2.raku
index 6762d2c45e..d2e8fbe417 100644
--- a/challenge-124/mark-anderson/raku/ch-2.raku
+++ b/challenge-124/mark-anderson/raku/ch-2.raku
@@ -7,12 +7,11 @@ sub tug-of-war(+$list)
 {
     my $n = $list.elems div 2;
 
-    my %h = $list.combinations($n).map(-> @a
+    my %h = $list.combinations($n).map(-> $a
     {
-        my @b = ($list (-) @a).keys;
-
-        abs(@b.sum - @a.sum) => @a ~ ' ' ~ @b;
+        my $b = ($list (-) $a).keys.List;
+        abs($b.sum - $a.sum) => ($a, $b);
     });
 
-    .head($n), .tail(* - $n) with %h.min.value.split(/\s/).cache;
+    %h.min.value;
 }