diff options
| -rw-r--r-- | challenge-099/mark-anderson/raku/ch-1.raku | 3 |
1 files changed, 1 insertions, 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; } |