« Programmation Perl/Itérations » : différence entre les versions
Contenu supprimé Contenu ajouté
Ligne 142 :
==== exemples ====
En utilisant ''foreach'' et ''keys'' :<p>
Contrairement à "for", l‘ordre de sortie est aléatoire, néanmoins tout y est !
<source lang="perl" line >
my %tab_asso = qw/ a 1 b 2 c 3 d 4 e 5/;
Ligne 148 ⟶ 149 :
foreach my $cle (keys %tab_asso)
{
say $cle
}
</source>
Ligne 158 ⟶ 159 :
while (my ($cle, $valeur) = each %tab_asso)
{
say $cle , $valeur," ";
}
</source>
| |||