in reply to Find prime number between 1 to 1000000

Don't calculate when you can lookup! This will test almost a million numbers per second: 

c:\test>perl Math\Primes\First_1e6.pm
Found 122571 primes from 1000000 tries in 1.145 seconds (873362/s)

[download]
<Reveal this spoiler or all in this thread>

In Section Seekers of Perl Wisdom