Select Code to Download

C:\test>primes.pl 15e6
The 15000000th prime is: 275604541
1 trial of Finding the 15000000 prime (47.118ms total)

1 trial of Retrieving the first 15000000 primes (11.906s total)

#! perl -slw
use strict;
...
print for @{ $primes }[ 0 .. 99 ];
print "The last  100 primes (of the first ARGV[ 0 ]) are:";
print for @{ $primes }[ -100 .. -1 ];

$checksum = unpack '%32C*', $bytes;

sub primeN { return unpack "%32C" . (0+$_[0]), $deltas; }