next up previous contents
suivant: Faire un serveur UDP monter: Communication inter-process précédent: Utiliser un client TCP   Table des matières

Utiliser un client UDP

Utiliser le module IO::Socket :

if(my $sock = IO::Socket::INET -> 
                new ( Proto => 'udp',
                      PeerPort => $port,
                      PeerAddr=>$server)){
    $sock -> send($msg) or warn $!;
    $sock -> recv($return,$max_len) or warn $!;
    $sock -> close() or warn $!;
}



Stephane TOUGARD 2002-09-07