diff options
| -rw-r--r-- | challenge-102/mark-anderson/raku/ch-2.raku | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/challenge-102/mark-anderson/raku/ch-2.raku b/challenge-102/mark-anderson/raku/ch-2.raku index 01b42937a4..d178f1ed25 100644 --- a/challenge-102/mark-anderson/raku/ch-2.raku +++ b/challenge-102/mark-anderson/raku/ch-2.raku @@ -37,13 +37,9 @@ sub hash-string(UInt $n where $n > 0) is cached { given $n { - when 1 { "#" } - when 2 { "2#" } - when 3 { "#3#" } - default - { - my $next = $n - $n.chars - 1; - hash-string($next) ~ $n ~ "#"; - } + when 1 { "#" } + when 2 { "2#" } + when 3 { "#3#" } + default { hash-string($n - $n.chars - 1) ~ $n ~ "#" } } } |