Probleme Hash "Odd number of elements in anonymous hash at "

Bonjour,

voilà j'ai un petit souci avec une hash.

J'ai un tableau @ancestors qui contient les hash des differents ancetres de mon élément courant.

J'ai codé une fonction qui, pour chaque élément final (le plus "profond" dans la parenté), retourne une hash avec pour chaque clé (correspondant à chaque élément final), une autre hash contenant différentes valeurs et je voudrais que l'une d'elle soit @ancestors.

Cependant, je me retrouve avec le message d'erreur "Odd number of elements in anonymous hash at...".

Ma hash de sortie peut etre schématisée de la façon suivante :
Code:

1 2 3 4 5 6 7 $funct{ $funct_name } = { data_infos => xxxxx, nature => xxxxx, .... ancetres => @ancestors };
Quelle peut être l'origine de ce message en sachant que chaque élément de ancestors est une Hash ?

Merci d'avance.

Ludovic

Le problème vient du fait que dans ta hash il y a quelque chose qui n'est pas correct, une mauvaise paire clé/valeur.

Par exemple j'obtiens le même message si

Code:

$ancestors[0] = ({"a"=>"A", "b"=>});

http://search.cpan.org/dist/perl/pod/perldiag.pod

Citation:

Odd number of elements in anonymous hash
(W misc) You specified an odd number of elements to initialize a hash, which is odd, because hashes come in key/value pairs.

Jasmine,

Les clés d'un hash ne peuvent être que des strings et les valeurs ne peuvent être que des scalaires, donc pas un tableau comme @ancestors. Ici @ancestors est en fait aplati et son premier élément devient la valeur associé à "ancetre", son deuxième devient la clé du troisième, etc...
Et comme tu as de la chance, au final tu as un nombre impair d'éléments et Perl te signale donc l'erreur !

Ce que tu veux faire c'est stocker une référence sur @ancestors, pas @ancestors lui-même :
Code:

1 2 3 4 5 6 $funct{ $funct_name } = { data_infos => xxxxx, nature => xxxxx, .... ancetres => \@ancestors };
--
Jedaï

D'accord,

Merci de ces renseignements.

Une dernière question : si je mets la référence à @ancestors, est ce que, si je mets ma Hash %funct en entrée d'un template perl, je pourrais avoir accès aux valeurs contenues dans @ancestors (valeurs qui sont des hash pour information) ?

Si oui, comment ?

Ludovic

Lis notre FAQ sur les structures de données avancées, il n'y a pas de raison que rajouter un niveau pose de problème. Quel système de Template utilises-tu ?

--
Jedaï

J'utilise le module Epl et GEN_FILE (pour les routines ReadTemplate, CreateCFile, CreateHFile) qui sont appelées dans un .pm

Voici un exemple de code :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
my $template_file = "toto.pc";
# Get template content as a line
my $template = GEN_FILES->ReadTemplate( $template_file);
 
# Fill in generated file content
my $file_content = Epl::fill(
                                   $template,
                                   {
                                    var1       => xxx,
                                    .... 
                                    function => \%function
                                  }
                                );
 
# Generate file
GEN_FILES->CreateCFile( "totofile.c", $file_content);

Avec %function défini comme suit :

Code:

1
2
3
4
5
6
 
$function{ $funct } = {
                              data   => xxxx,
                              ....
                              ancetres => \@ancestors
                              };

En gros, j'ai en entrée de mon template une référence vers une hash qui contient une référence vers un tableau de hash (@ancestors).
Comment accéder aux infos des hash du tableau au sein de mon template ?
J'ai tout de meme une question :
Comment récupérer la taille du tableau ancestors à partir de sa référence ?

Merci d'avance.
Ludovic

Regarde c'est bien expliqué ici
http://www.april.org/groupes/doc/perl/perl-7.html

Jasmine,