#Perl, 23 bytes say<>=~/^(?!(..+)\1+$)/ Using the regular expression approach, prints <code>11</code> or a blank line