#!/usr/local/bin/perl
# the resting place of the log file to search
$dir = "/usr/local/httpd/logs";
# name of the log file
$file = "access_log";
$total = 0;
$count = 0;
$users = 0;
$home = 0;
print "Content-type: text/html
How busy the Crossfire pages have been
How busy the Crossfire pages have been
";