RE: Problems with Sockets

2003-07-16 Thread Kipp, James
> > use IO::Socket; > > $server_port = 514; > > $server = IO::Socket::INET -> new(LocalPort => $server_port, > Proto => "udp") > or die "Couldn't be a udp server on port $server_port : [EMAIL PROTECTED]"; > > while ($him = $server ->recv($datagram, 1024)) { > > ($portn

Problems with Sockets

2003-07-16 Thread Ruben Montes
Hello, I have developed an UDP server and I need to know the ip address of the remote peer. This is the code: use IO::Socket; $server_port = 514; $server = IO::Socket::INET -> new(LocalPort => $server_port, Proto => "udp") or die "Couldn't be a udp server on port $server_port : [EMAIL PROTECTED]