note
tall_man
I was going to suggest, as usual, that you use [cpan://Math::Pari] and the function isprime(), but your clever adjust method skips so many cases that even the brute-force prime checker you have is good enough. Math::Pari only buys you a fraction of a second.
442179
442179