From e09f00d1083cd0ff984721f5687e614866b5d5e7 Mon Sep 17 00:00:00 2001 From: Mark Anderson Date: Tue, 9 Feb 2021 00:05:40 -0700 Subject: Challenge 99 Solutions (Raku) --- challenge-099/mark-anderson/raku/ch-1.raku | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/challenge-099/mark-anderson/raku/ch-1.raku b/challenge-099/mark-anderson/raku/ch-1.raku index f3ea085ab2..84ea24421b 100644 --- a/challenge-099/mark-anderson/raku/ch-1.raku +++ b/challenge-099/mark-anderson/raku/ch-1.raku @@ -9,5 +9,5 @@ is pattern-match("abcde", "a*c?e"), 1; sub pattern-match($S, $P) { - ($S ~~ / ^ <{ $P.trans: ["?", "*"] => [".", ".*"] }> $ /).Bool.UInt; + ($S ~~ / ^ <{ $P.trans: => <. .*> }> $ /).Bool.UInt; } -- cgit