>>104
どうもありがとうございます。
gethostbyaddrという名はみつかりませんでしたが、&GetDomainByAddrというのがありますがこれでいいんでしょうか?
921行目の
$domain = &GetDomainByAddr($remote_host{$i}, \%IpList);
を
$domain = &GetDomainByAddr($ENV{'REMOTE_HOST'}, \%IpList);
に置き換えてみましたが、これといった変化は見られませんね。
また、4215行目もオリジナルからの書き換えが必要ですかね?