in reply to Re: Prime Number Finderin thread Prime Number Finder
my $number = shift;
my $sqrt = sqrt $number;
my $d = 2;
return 0 if ( $number % $d == 0 );
return 1 if ( $d > $sqrt );
15 years from now, by which time it will be a completely different language
It's just a number, so who cares?
Results (116 votes). Check out past polls.