print "\t=> Bad user!\n" if  @{$searches{$conn}} > 3;