Bonjours j'utilise la librairie IO::Socket::INET je voudrais faire un server qui accepte la connection et ou je puisse chatter j'ai donc écrit :
Je ne sais même pas si se bout de code est bon je voudrais aussi pouvoir renvoyé un message mais je ne sais pas comment faire.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 while(1) { $sock->recv(my $rep,128); if(my $rep ne ''){ print $sock->peerhost, "Msg:", $rep,"\n"; } }
Partager