From 786bd6c0347ca8dc7a71ce631680d34579b0be0a Mon Sep 17 00:00:00 2001 From: Mark A Date: Mon, 22 Mar 2021 13:37:35 -0600 Subject: Challenge 105 Solutions (Raku) --- challenge-105/mark-anderson/raku/ch-2.raku | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/challenge-105/mark-anderson/raku/ch-2.raku b/challenge-105/mark-anderson/raku/ch-2.raku index b6ee181534..90e3ea8df2 100644 --- a/challenge-105/mark-anderson/raku/ch-2.raku +++ b/challenge-105/mark-anderson/raku/ch-2.raku @@ -61,9 +61,11 @@ is name-game("Marsha"), chomp q:to/END/; sub name-game($X) { - my $Y = lc $X ~~ / :i <[aeiou]> \w+ $ /; + my $x = lc $X; - my $first = lc $X.substr: 0, 1; + my $Y = $x ~~ / <[aeiou]> \w+ $ /; + + my $first = $x.substr: 0, 1; .join: "\n" given -- cgit