diff options
| author | Mark Anderson <mark@frontrangerunner.com> | 2020-04-07 09:30:48 -0600 |
|---|---|---|
| committer | Mark Anderson <mark@frontrangerunner.com> | 2020-04-07 09:30:48 -0600 |
| commit | 52acfd742c35e7e310d9932237d070b71c6a993b (patch) | |
| tree | 9699b2769f7f6f721b443c77da8e6958adec2aae | |
| parent | a2466b7ca7a29718db46c8b8d2af45ff62dcf958 (diff) | |
| download | perlweeklychallenge-club-52acfd742c35e7e310d9932237d070b71c6a993b.tar.gz perlweeklychallenge-club-52acfd742c35e7e310d9932237d070b71c6a993b.tar.bz2 perlweeklychallenge-club-52acfd742c35e7e310d9932237d070b71c6a993b.zip | |
ch-2.p6 join removed
| -rw-r--r-- | challenge-055/mark-anderson/raku/ch-2.p6 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-055/mark-anderson/raku/ch-2.p6 b/challenge-055/mark-anderson/raku/ch-2.p6 index 0a89199d0f..5fe9486805 100644 --- a/challenge-055/mark-anderson/raku/ch-2.p6 +++ b/challenge-055/mark-anderson/raku/ch-2.p6 @@ -3,6 +3,6 @@ use MONKEY-SEE-NO-EVAL; sub MAIN(*@array where @array ~~ /\d/) { for @array.permutations.map(~*).unique { .say if EVAL (.comb(/\d/) <<Z~>> (" >= ", " <= ")) - .join.subst(/\s.\=\s$/, q{}); + .subst(/\s.\=\s$/, q{}); } } |