(1x$_)=~/^((1+)\2\2(?=\2$))*1{7}(1{8})*$/&&print$_,$/for 1..999
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page