Création d’un serveur pour échanger avec les connexions des clients

Author:
#!/usr/local/bin/perl
   ############## Socket Serveur ################

use Socket;

my $port_serve