diff options
| -rw-r--r-- | challenge-265/asherbhs/raku/ch-1.raku | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/challenge-265/asherbhs/raku/ch-1.raku b/challenge-265/asherbhs/raku/ch-1.raku index 1eaf883865..a81cddabca 100644 --- a/challenge-265/asherbhs/raku/ch-1.raku +++ b/challenge-265/asherbhs/raku/ch-1.raku @@ -1,5 +1,6 @@ sub appearance(Int:D @ints --> Int) { - my @keys = @ints.Bag.grep(*.value ≥ 0.33 × @ints)».key; + my $len = 0.33 × @ints; + my @keys = @ints.Bag.grep(*.value ≥ $len)».key; @keys ?? min @keys !! Int } |