From: Banana Date: Thu, 16 Feb 2012 09:25:38 +0000 (+0100) Subject: code cleanup X-Git-Tag: 2.1-alpha-2019-0-29~92 X-Git-Url: http://91.132.146.200/gitweb/?a=commitdiff_plain;h=f75720255790f27d6e75982663250c0321b07b87;p=insipid.git code cleanup --- diff --git a/lib/Insipid/Stats.pm b/lib/Insipid/Stats.pm index be048e1..be6ba95 100644 --- a/lib/Insipid/Stats.pm +++ b/lib/Insipid/Stats.pm @@ -63,13 +63,11 @@ sub groupByDomain { if($sth->rows ne 0) { while(@row = $sth->fetchrow_array()) { - #print $row['url']."
"; my $uri = URI->new($row['url']); - #print $uri->host."
"; + if($domains{$uri->host}) { $domains{$uri->host}++; - } - else { + } else { $domains{$uri->host} = 1; } }