From c7396711c480ba2efa859ef6095fe15907bb2742 Mon Sep 17 00:00:00 2001
From: Mark Anderson <mark@frontrangerunner.com>
Date: Mon, 8 Feb 2021 23:33:50 -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 9bd7d0c63e..4d8687f9da 100644
--- a/challenge-099/mark-anderson/raku/ch-1.raku
+++ b/challenge-099/mark-anderson/raku/ch-1.raku
@@ -9,7 +9,6 @@ is pattern-match("abcde", "a*c?e"), 1;
 
 sub pattern-match($S, $P is copy) 
 {
-    $P ~~ s:g/ \? / .  /;
-    $P ~~ s:g/ \* / .* /;
+    $P .= trans: ["?", "*"] => [".", ".*"];
     so $S ~~ / ^ <$P> $ / andthen .Int;
 }
-- 
cgit