Re: Simple primality testing

My favourite way to test primality is:

sub is_prime {
    ('1' x shift) !~ /^(11+)\1+$/
}
[download]

:-)

Ted Young

($$<<$$=>$$<=>$$<=$$>>$$) always returns 1. :-)

In Section Meditations