#!/usr/bin/perl use warnings; use strict; our %pages; foreach my $line (<>) { my ($ip, $date, $time, $page, $size) = split /\s+/, $line; $pages{$page}++; } while (my($page, $count) = each %pages) { print "$page was accessed $count times\n"; } #### Use of uninitialized value $page in hash element at ./get_apache line 8, <> line 17. Use of uninitialized value $page in hash element at ./get_apache line 8, <> line 17. was accessed 2 times /~zz251/ebay/320-1578.jpg was accessed 4 times /~jrc258/KagomenInuyasha2.gif was accessed 1 times /~jrc258/mainindex.html was accessed 1 times ect..... #### 67.82.45.186 14/May/2004 22:17:34 /~pkp201 8028 67.82.45.186 14/May/2004 22:17:34 /~pkp201/Logo_40wht.gif 295 66.27.114.2 14/May/2004 22:22:30 /~zz251/ebay/320-1578.jpg 31185 148.240.172.183 14/May/2004 22:24:38 /~jrc258/KagomenInuyasha2.gif 314 148.240.172.183 14/May/2004 22:24:50 /~jrc258/mainindex.html 299 68.161.9.118 14/May/2004 22:25:23 /~zz251/ebay/320-1578.jpg 31185 136.181.195.77 14/May/2004 22:26:31 /~zz251/ebay/320-1578.jpg 31185 65.33.60.114 14/May/2004 22:26:49 /~zz251/ebay/320-1578.jpg 31185 12.76.96.245 14/May/2004 22:28:04 /~avm205/ 281 68.49.208.214 14/May/2004 22:28:58 /~lc204/badge.JPG 289 24.215.226.51 14/May/2004 22:29:45 /~dc619/ 308 24.29.148.97 14/May/2004 22:30:27 /~jmb299/mohawk.jpg 310 24.29.148.97 14/May/2004 22:30:27 /~jmb299/Jay_Tough.jpg 250 24.29.148.97 14/May/2004 22:30:27 /~jmb299/TikiParty.gif 180 24.29.148.97 14/May/2004 22:30:27 /~jmb299/lanceflyer.jpg 307