#!/usr/local/bin/perl
my %mes_villes = (“Allemagne” => “Berlin”,
“Angleterre” => “Londre”,
#!/usr/local/bin/perl
my %mes_villes = (“Allemagne” => “Berlin”,
“Angleterre” => “Londre”,
#!/usr/bin/perl
# Définition d’un tableau de 3 éléments
@tab = (“Janvier”, “Mars”, “Mai”);
#Affich
#!/usr/bin/perl -w
#################### Hash ##################”
# Le Hash est un tableau associatif
#!/usr/bin/perl
# Démander à l’utilisateur de taper un mot ou une phrase
# Vérifier si l’entrée est
#!/usr/bin/perl
print “Tapez une phrse commençant par le mot perl: “;
foreach $elem ($ligne=
#!/usr/bin/perl
# Démander à l’utilisateur de taper un mot ou une phrase
# Vérifier si l’entrée est
#!/usr/bin/perl -w
# Empêcher l’utilisateur à appuyer
# sur plusiuers touches du clavier
#!/usr/bin/perl -w
# Ce programme lit les caractères en mode caché
# Efficace pour les mots d
#!/usr/local/bin/perl
############## Socket Client ################
use Socket;
#!/usr/local/bin/perl
use IO::Socket;
my $remote_host=”127.0.0.1″; # L’adresse du serveur
m