diff options
| author | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2020-06-03 00:44:42 +0100 |
|---|---|---|
| committer | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2020-06-03 00:44:42 +0100 |
| commit | b031e08e402e14f96d25cc17c84a7c6438fa060a (patch) | |
| tree | 3f8da55d749131454e3b0dba7604375693b4f86a | |
| parent | 8a2fd344ddf0dddac5348be199b53a091cecff12 (diff) | |
| download | perlweeklychallenge-club-b031e08e402e14f96d25cc17c84a7c6438fa060a.tar.gz perlweeklychallenge-club-b031e08e402e14f96d25cc17c84a7c6438fa060a.tar.bz2 perlweeklychallenge-club-b031e08e402e14f96d25cc17c84a7c6438fa060a.zip | |
- Minor improvement.
| -rw-r--r-- | challenge-063/mohammad-anwar/raku/ch-1a.p6 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-063/mohammad-anwar/raku/ch-1a.p6 b/challenge-063/mohammad-anwar/raku/ch-1a.p6 index 3816d7d6d1..cbba11878c 100644 --- a/challenge-063/mohammad-anwar/raku/ch-1a.p6 +++ b/challenge-063/mohammad-anwar/raku/ch-1a.p6 @@ -3,7 +3,7 @@ use v6.d; sub MAIN(Str :$string = ' hello world', Regex :$regex = rx/ <[ea]>l /) { - say last-word($string, $regex); + last-word($string, $regex).say; } sub last-word(Str $string, Regex $regex) { |