chiburashka has asked for the wisdom of the Perl Monks concerning the following question:

This node falls below the community's threshold of quality. You may see it by logging in.

Replies are listed 'Best First'.
Re: client IP
by borisz (Canon) on Aug 13, 2004 at 12:26 UTC 
    print STDOUT inet_ntoa((unpack_sockaddr_in($s->io_handle->connected))[
+1]);

    [download]
    Boris
[reply]
[d/l]
    A reply falls below the community's threshold of quality. You may see it by logging in.

Back to Seekers of Perl Wisdom