>
> 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
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]