#! /usr/bin/perl

#
# Webalizer Update Script v1.6
# Copyright (C) 2001 Julia Thomas Associates
#

# This script will update Webalizer so it shows the most up-to-date stats.

system("/usr/local/bin/webalizer");

open(INDEX, "index.html");
while (<INDEX>) {
 $index .= $_;
}
close(INDEX);

print "Content-type: text/html\n\n";
print <<EOF;
$index
EOF