diff options
| -rw-r--r-- | challenge-289/mark-anderson/raku/ch-2.raku | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/challenge-289/mark-anderson/raku/ch-2.raku b/challenge-289/mark-anderson/raku/ch-2.raku index 730816d540..a1ffc5c2d3 100644 --- a/challenge-289/mark-anderson/raku/ch-2.raku +++ b/challenge-289/mark-anderson/raku/ch-2.raku @@ -11,9 +11,11 @@ my $text = chomp q:to/END/; say jumbled-letters($text); +say jumbled-letters("They've shouldn't've, __LINE__ under_score y'all you're"); + sub jumbled-letters($text) { - my @split = $text.split(/ \s+ || \— || \- /, :v); + my @split = $text.split(/ <[\s — - ]> /, :v); for @split[0,2...*] { |