diff options
| -rw-r--r-- | challenge-134/mark-anderson/raku/ch-1.raku | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/challenge-134/mark-anderson/raku/ch-1.raku b/challenge-134/mark-anderson/raku/ch-1.raku index ff78af9b7d..82bea0e855 100644 --- a/challenge-134/mark-anderson/raku/ch-1.raku +++ b/challenge-134/mark-anderson/raku/ch-1.raku @@ -5,12 +5,7 @@ say pandigital(999); say pandigital(^5); say pandigital(400, 300, 200, 100, 0); -multi pandigital(UInt $i) -{ - (1023456789.comb.permutations)[$i].join; -} - -multi pandigital(+$arr where .all ~~ UInt) +sub pandigital(+$arr where .all ~~ UInt) { - (1023456789.comb.permutations)[|$arr]>>.join; + (1023456789.comb.permutations)[|$arr]>>.join.join(', '); } |