Pernicious numbers: Difference between revisions
m
Fix Perl 6 -> Raku in comments
Thundergnat (talk | contribs) (Rename Perl 6 -> Raku, alphabetize, minor clean-up) |
Thundergnat (talk | contribs) m (Fix Perl 6 -> Raku in comments) |
||
Line 2,120:
=={{header|Raku}}==
(formerly Perl 6)
Straightforward implementation using
<lang perl6>sub is-pernicious(Int $n --> Bool) {
is-prime [+] $n.base(2).comb;
| |||