Archive for September 4th, 2008

Sieve of Eratosthenes as a Regexp

Thursday, September 4th, 2008

No, really.

sub is_prime { ('1' x shift) !~ /^1?$|^(11+?)\1+$/) }