From aded74af837906d63e6a6b3560a227b7cd06d8c8 Mon Sep 17 00:00:00 2001 From: Mark A Date: Tue, 2 Mar 2021 16:18:15 -0700 Subject: ch-2.raku --- challenge-102/mark-anderson/raku/ch-2.raku | 18 +++--------------- 1 file changed, 3 insertions(+), 15 deletions(-) diff --git a/challenge-102/mark-anderson/raku/ch-2.raku b/challenge-102/mark-anderson/raku/ch-2.raku index c7a74a2f9d..01b42937a4 100644 --- a/challenge-102/mark-anderson/raku/ch-2.raku +++ b/challenge-102/mark-anderson/raku/ch-2.raku @@ -37,21 +37,9 @@ sub hash-string(UInt $n where $n > 0) is cached { given $n { - when 1 - { - "#"; - } - - when 2 - { - "2#"; - } - - when 3 - { - "#3#"; - } - + when 1 { "#" } + when 2 { "2#" } + when 3 { "#3#" } default { my $next = $n - $n.chars - 1; -- cgit