diff options
| author | Mark A <andemark@a-iot1t.uch.ad.pvt> | 2021-06-28 02:12:21 -0600 |
|---|---|---|
| committer | Mark A <andemark@a-iot1t.uch.ad.pvt> | 2021-06-28 02:12:21 -0600 |
| commit | 07f99af4aaac3e6a86abcabcdb3b209fcdc025af (patch) | |
| tree | e4d2afa57b2f4ab7da1be4d80a8988829b816767 | |
| parent | 6bcc8ab7a881909e65d16d83082552588da7bfda (diff) | |
| download | perlweeklychallenge-club-07f99af4aaac3e6a86abcabcdb3b209fcdc025af.tar.gz perlweeklychallenge-club-07f99af4aaac3e6a86abcabcdb3b209fcdc025af.tar.bz2 perlweeklychallenge-club-07f99af4aaac3e6a86abcabcdb3b209fcdc025af.zip | |
Challenge 119 Solutions (Raku)
| -rw-r--r-- | challenge-119/mark-anderson/raku/ch-1.raku | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-119/mark-anderson/raku/ch-1.raku b/challenge-119/mark-anderson/raku/ch-1.raku index 2b9413c65a..1a512829b9 100644 --- a/challenge-119/mark-anderson/raku/ch-1.raku +++ b/challenge-119/mark-anderson/raku/ch-1.raku @@ -6,7 +6,7 @@ plan 2; is swap-nibbles(101), 86; is swap-nibbles(18), 33; -sub swap-nibbles($N where * > 0) +sub swap-nibbles($N where * ~~ 1..255) { $N.fmt('%08b').comb(4).rotate.join.parse-base(2) } |