Multi-base primes: Difference between revisions
m
→{{header|Perl}}: oops, change code to match output
SqrtNegInf (talk | contribs) (Added Perl example) |
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: oops, change code to match output) |
||
Line 1,102:
my(%prime_base, %max_bases, $l);
my $chars =
my $upto = fromdigits( '1' . 'Z' x $chars, 36);
my @primes = @{primes( $upto )};
| |||