That definitely returned something! I'll look into that more and gauge format.
I had a chance to look it up this time. This is easier. Just call peerhost() on the socket object:
my $ip_addr = $socket->peerhost();
James
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>