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 :

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";
  }
 
}
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.