awstats

1. Follow Me

Fix the reverse DNS host problem.

$filename = '/var/lib/awstats/dnscachelastupdate.' . $SiteDomain . '.txt';
if (open(FILE, $filename)) {
        while(<FILE>)
        {
                chomp;
                @fields = split('\t', $_);
                if (lc($fields[2]) eq $host) { $host = $fields[1]; }
        }
        close FILE;
}