All pastes #567121 Raw Edit

Untitled

public text v1 · immutable
·published 2007-06-14 19:52 UTC
rendered paste body
perl -wle '(1 .1 x $_) !~ /^(11+)\1+$/ && 
           print $_ + 1 while ++ $_'