cat logfile|awk {'print $3'}|sort|uniq -c > counts.txt
##</code><code>##

$occurences{(split)[2]}++ while (<>);
foreach $url (keys %occurences) {
print "$occurences{$url}\t$url\n";
}

##</code><code>##

<prompt> perl -w programname logfiles