Prime numbers which contain 123: Difference between revisions
→{{header|Raku}}: use defaults
Thundergnat (talk | contribs) (→{{header|Raku}}: Add a Raku example) |
Thundergnat (talk | contribs) (→{{header|Raku}}: use defaults) |
||
Line 190:
<lang perl6>my @p123 = ^∞ .grep: { .is-prime && .contains: 123 };
put display
put "\nCount up to 1e6: ", ~ +@p123[^(@p123.first: * > 1e6, :k)];
| |||