0 /usr/local/etc/webmin/webalizer/webalizer.pl
#!/usr/local/bin/perl
open(CONF, "/usr/local/etc/webmin/miniserv.conf") || die "Failed to open /usr/local/etc/webmin/miniserv.conf : $!";
while(<CONF>) {
        $root = $1 if (/^root=(.*)/);
        }
close(CONF);
$root || die "No root= line found in /usr/local/etc/webmin/miniserv.conf";
$ENV{'PERLLIB'} = "$root";
$ENV{'WEBMIN_CONFIG'} = "/usr/local/etc/webmin";
$ENV{'WEBMIN_VAR'} = "/var/log/webmin";
chdir("$root/webalizer");
exec("$root/webalizer/webalizer.pl", @ARGV) || die "Failed to run $root/webalizer/webalizer.pl : $!";
