Mega Code Archive

 

Categories / Perl / Network

 

UDP server

use IO::Socket; $socket = IO::Socket::INET->new (     LocalPort => 4321,     Proto => 'udp' ); $socket->recv($text, 128);