Question de base sur les hash

Voici un petit programme que je tente de comprendre pour m'aider avec les hash (l'exemple est dans un livre)

use strict;

my (@words, %count, $word);

chomp(@words = <STDIN>);

foreach $word(@words){
$count{$word} += 1;
}

foreach $word(keys %count) {
print "$word was seen $count{$word}\n";
}

Lorsque je déclare mes variables %count est bien une déclaration pour un hash?

Par la suite, pour le premier foreach j'utilise $count et non %count quelqu'un pourrait me dire pourquoi?

Bonjour,

Oui, %count est bien une déclaration pour un hash.

Si tu veux manipuler tout le hash (en tant que collection de paires clé-valeur) il faut utiliser le "sigil" %, de même qu'il faut utiliser le sigil @ pour manipuler le tableau @words.

Mais lorsque tu veux accéder à une donnée individuelle d'un hash ou d'un tableau, alors il faut utiliser le sigil $ pour indiquer que tu va utiliser une valeur scalaire individuelle. Le fait d'utiliser les accolades {} pour un hash et les crochets [] pour un tableau rappelle la nature de la structure de données dans laquelle tu vas aller piocher ta valeur scalaire individuelle (et le dit à l'interpréteur perl). Exemple:

Code:

---

1 2 3 4 5

my %hash = (jan => 0, feb => 1, mar =>2, ...); my @array = qw / jan feb mar apr .../;   print $hash{jan}; # imprime 0 print $array[2]; # imprime mar (un tableau commence à l'indice 0)

---

Mais si tu accèdes à plusieurs valeurs d'un seul coup, par exemple avec une "tranche de tableau" il faut utiliser le sigil correspondant un tableau, @. Par exemple:

Code:

---

1 2	print "@array[0..2]"; # imprime "jan feb mar". print "@hash{jan, feb}"; # imprime "0 1"

---

Merci sa m'aide beaucoup. Je comprends mieux maintenant.