ENV REMOTE_HOST ermitteln

[Beat Strasser]

Hi there

Hoffentlich hast Du mehr Glück :-)
Nein, leider nicht :-(((

Also bei mir geht das folgendermassen:

use IO::Socket;
  $ENV{'REMOTE_HOST'} = gethostbyaddr(inet_aton($ENV{'REMOTE_ADDR'}), AF_INET) or $ENV{'REMOTE_ADDR'};

Gruss,
Beat