http://qs1969.pair.com?node_id=1120192


in reply to Not a Sieve

See also prime factorization using base 1 which suggests

print"$_,"x(1x$_)!~/^(11+)\1+$/ for 2..232