From 6946490cca746d4d684e7c8b281339513ef1895a Mon Sep 17 00:00:00 2001
From: Mark Anderson <mark@frontrangerunner.com>
Date: Mon, 8 Feb 2021 23:46:15 -0700
Subject: Challenge 99 Solutions (Raku)

---
 challenge-099/mark-anderson/raku/ch-1.raku | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/challenge-099/mark-anderson/raku/ch-1.raku b/challenge-099/mark-anderson/raku/ch-1.raku
index 4d8687f9da..8f580eac2f 100644
--- a/challenge-099/mark-anderson/raku/ch-1.raku
+++ b/challenge-099/mark-anderson/raku/ch-1.raku
@@ -9,6 +9,5 @@ is pattern-match("abcde", "a*c?e"), 1;
 
 sub pattern-match($S, $P is copy) 
 {
-    $P .= trans: ["?", "*"] => [".", ".*"];
-    so $S ~~ / ^ <$P> $ / andthen .Int;
+    so $S ~~ / ^ <{ $P.trans: ["?", "*"] => [".", ".*"] }> $ / andthen .Int;
 }
-- 
cgit