Itérer sur les valeurs de hachage en perl

J'ai une table de hachage avec disons 20 valeurs.

Il est initialisé de cette façon:

my $line = $_[0]->[0];

    foreach my $value ($line) {
        print $value;
    }

Maintenant, quand j'essaie d'obtenir la valeur de chaque hachage dans $ligne il est dit:
Utilisation de la valeur non initialisée à imprimer à file.pl ligne 89

Est-il un moyen pour itérer sur chaque valeur de hachage?

J'ai aussi essayé avec:

my %line = $_[0]->[0];

    foreach my $key (keys %line) {
        print %line->{$key};
    }

Mais c'est aussi ne fonctionne pas:
Référence trouvé où même la taille de la liste prévue à file.pl à la ligne 89

Quelqu'un sait quoi faire? Il ne devrait pas être difficile...

  • Je suis confus. Certain me semble que vous avez initialisé un scalaire, pas une table de hachage.
  • Et dans ton deuxième exemple, vous essayez de faire une table de hachage, mais vous êtes toujours à l'attribution d'un scalaire - c'est peut-être un hachage ref?
  • Utiliser le débogueur Perl et imprimer votre arglist à l'aide de la x de commande.
InformationsquelleAutor baklap | 2010-11-10
  1. 3

    $line dans votre premier exemple est un scalaire, pas une table de hachage.

    Si c'est un hash de référence, de déréférencement avec %{$line}.

    • Ah je vois! Maintenant, il travaille avec: my $ligne = $_[0]->[0]; foreach my $valeur (en %des valeurs{$ligne}) { print $de la valeur . "\n"; }
    InformationsquelleAutor Christoffer Hammarström
  2. 10

    Pour effectuer une itération sur les valeurs dans une table de hachage:

    for my $value (values %hash) {
  print $value;
}
    InformationsquelleAutor Grey Panther
  3. 3

    Tout d'abord, vous devez comprendre la différence entre une table de hachage, et un hachage de référence.

    Votre affectation initiale $_[0]->[0] signifie quelque chose comme : Prend le premier argument de la fonction en cours ($_[0]), déréférencement d'elle (->) et le considérer comme un tableau et le récupère de la première valeur ([0]). Cette valeur ne peut pas être une liste ou d'une table de hachage, il doit être un scalaire (string, int, float, référence).

    Voici quelques exemple:

    my %hash = ( MyKey => "MyValue");
my $hashref = \%hash;
# The next line print all elements of %hash
foreach (keys %hash) { print $_ }
# And is equivalent to
foreach (keys %{$hashref}) { print $_ }
$hash{MyKey} == $hashref->{MyKey}; # is true

    Veuillez vous référer à http://perldoc.perl.org/perlreftut.html pour plus de détails.

    • Non, $_[0] n'est pas une fonction. C'est la première (scalaire) de l'élément de @_. Donc $_[0]->[0] — qui est le même que $_[0][0] et ${ $_[0] }[0] — prend que le premier élément scalaire de @_, il considère être une référence à un tableau, et renvoie le premier élément de cette putativement référencé tableau.
    • N'a jamais dit que $_[0] est une fonction.
    InformationsquelleAutor OMG_peanuts
  4. 1

    L'avertissement est vous dire qu'il y rien à $_[0]->[0]. Ce n'est pas en train de mourir et de vous dire que vous êtes d'indexation rien, donc $_[0] est probablement un arrayref, mais rien n'est dans le premier emplacement, ou peut-être qu'il pointe vers un tableau vide.

    • Ont une chaîne vide ou un 0, il n'aurait pas à se plaindre.
    • Il n'y a pas de référence de là, vous pouvez imprimer quelque chose même si ce n': BLAH(0x80af74). (Où "BLA" est l'un des "ARRAY", "HASH", "SCALAIRE", "REF", "GLOB", "IO", ... )

    Ma suggestion est que vous faites cela: 

    use Data::Dumper;
say Data::Dumper->Dump( [ $_[0] ] ); # or even say Data::Dumper->Dump( [ \@_ ] )

    et ensuite chercher à la sortie.

    Une fois que vous avez un hashref à $_[0]->[0], alors si vous devez parcourir la table de hachage, la meilleure façon est: 

    while ( my ( $key, $value ) = each %$hashref ) { 
   do_stuff_with_key_and_value( $key, $value );
}

    voir chaque

    Enfin, il semble que vous avez quelques sceau de la confusion. Voir la dernière partie de ce lien pour une vie décente pour tenter d'expliquer que les sigils ( '$', '@', '%' ) sont pas partie du nom d'une variable, mais les indicateurs de ce que nous voulons extraire. Perl compilation malheurs

    InformationsquelleAutor Axeman