8792 sujets

Développement web côté serveur, CMS

Bonjour

Pour des besoins particuliers j'ai nécessité d'apprendre Perl. Me voilà devant une première question.
J'ai le hash suivant

my %saisons = (
	'abricot'=>['été'],
	'fraise'=> ['été',"autre"],
	'pomme'=> ['automne','hiver'],
	'orange'=> ['hiver'],
	'cerise'=> ['printemps'],
	'amande'=> ['printemps','été','automne','hiver']
);

J'essaie d'accéder aux différents élements. J'ai écrit

while (($indice, $value) = each(%saisons)) {
	push(@tabValue,$value);
}
for(my $i=0; $i <= $#tabValue ; $i++){
	for(my $j=0; $j < $#tabValue ; $j++){
		print "$tabValue[$i][$j]    ";
	}
	print "<br />"
}

Mais je n'obtiens pas les résultats attendus mais

été
printemps
été autre
automne hiver
hiver
printemps été automne hiver

Que dois je faire pour lister tous mes élements sans doublons ni oubli

Merci