diff options
| author | Mark <53903062+andemark@users.noreply.github.com> | 2021-12-26 10:07:54 +0000 |
|---|---|---|
| committer | Mark <53903062+andemark@users.noreply.github.com> | 2021-12-26 10:07:54 +0000 |
| commit | 17094e0d902c256357373b72be89f482c7d89921 (patch) | |
| tree | 59fa24193c545e0cdd8662e511299c9d753cf0d2 /challenge-144 | |
| parent | 856ae7ca622b717ff932df2d9ea2dda77a632f8e (diff) | |
| download | perlweeklychallenge-club-17094e0d902c256357373b72be89f482c7d89921.tar.gz perlweeklychallenge-club-17094e0d902c256357373b72be89f482c7d89921.tar.bz2 perlweeklychallenge-club-17094e0d902c256357373b72be89f482c7d89921.zip | |
ch-1.raku
Diffstat (limited to 'challenge-144')
| -rw-r--r-- | challenge-144/mark-anderson/raku/ch-1.raku | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-144/mark-anderson/raku/ch-1.raku b/challenge-144/mark-anderson/raku/ch-1.raku index fec97e370a..56e79ba1ed 100644 --- a/challenge-144/mark-anderson/raku/ch-1.raku +++ b/challenge-144/mark-anderson/raku/ch-1.raku @@ -13,6 +13,6 @@ is-deeply (^Inf).hyper.grep(&semi-prime)[1000, 2000, 5000, 9999], sub semi-prime($n) { - my @div = proper-divisors($n, :s).skip; - @div.elems and @div.all.is-prime; + my $div := proper-divisors($n, :s).skip; + $div.elems and $div.all.is-prime; } |