Bonjour, je suis désolé je ne cesse d'envoyer des messages sur le forum, je ais vous expliquer mon probléme:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
#!usr/perl/bin
use strict;
use warnings;
 
my %jeremy=('numero'=>'01535626764');
my %tony=('numero'=>'0143913430');
my %jack=('numero'=>'0163646748');
my %yohan=('numero'=>'0174374839');
print "cmd:";
my $a=<STDIN>;
chomp($a);
foreach $a(....)
{
	print $a;
}
Donc voila, j'aimerai que au lieu de
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
if ($a eq "jeremy"){}
j'aimerai m'exercer en foreach() mais je ne vois pas comment creer la boucle qui parcours les listes, donc le programme pour moi consiste : Si dans cmd: la l'utilisateur entre par exemple jeremy, je veux que automatiquement que tous ce qui se trouvent dans le tableau jeremy s'affiche, mais je ne vois pas trop comment

Merci beacoup de votre aide.