>>805
確認してなかったから>>804は文法的にも違ってたな。

$host = $ENV{'REMOTE_HOST'} && $ENV{'REMOTE_HOST'} ne $ENV{'REMOTE_ADDR'} ? $ENV{'REMOTE_HOST'} : ((($tmp = gethostbyaddr(pack('C4', split(/\./, $ENV{'REMOTE_ADDR'})), 2)) ne $ENV{'REMOTE_ADDR'}) ? $tmp : $ENV{'REMOTE_ADDR'});
これは検証済み。

>>806
お生憎様、俺はPHPをメインに使ってる