Syntaxe fonction eval

Bonjour,
voila j'ai effectuer quelque modification sur une variable afin de pouvoir utiliser la fonction eval mais celle ci n'effectue rien.
Je voudrais alors avoir votre avis sur la syntaxe que j'evalue.
Ma variable contient ceci :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34

run0000 => { Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05", }, run0001 => { Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05", L_P3 => "2.000000E-07", }; run0002 => { Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05", W_N5 => "1.000000E-05", W_N7 => "1.000000E-05", f => "1.000000E+00", }; run0003 => { Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05", L_N1 => "2.000000E-07", L_N3 => "2.000000E-07", L_N5 => "2.000000E-07", }; run0004 => { Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05", L_N1 => "2.000000E-07", };

---

Je cherche alors a obtenir des informations sur les paramatres de chaque runs.
Je split donc cette variable pour obtenir chacun des runs (contenant leurs parametres ) dans un tableau et effectue la fonction eval dessus.
Mais lorsque j'essaie d'afficher les parametres un par un des runs rien ne se passe.
C'est pourquoi je me demande si la syntaxe de mes tables de haschage sont bonnes.
Voila ce que j'effectue:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

my @evaluation;   my @spl = split( '},', $content ); # permet le split de la variable content foreach my $spls (@spl) { $spls = $spls . "};"; # permet d'obtenir une syntaxe un peu plus correct push( @evaluation, eval($spls) );   } foreach my $evaluations (@evaluation) { for my $key ( keys %$evaluations ) { print "BONNNNNN $key = BLA BLA BLA "; print $key, " => ", $$evaluations{$key}, "\n"; }

---

Qu'en pensez vous ?
Merci d'avance,
Cordialement.

Avec ton code, @spl ne contient que 2 elements: (du fait que tu a 1 "," et le reste est du ";" . Le ";" n'a lieu d'etre qu'a la fin de ta table de hachage, le reste c'est juste des virgules.


les deux éléments de @spl:

Code:

---

1 2 3 4

run0000 => { Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05",

---

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29

run0001 => { Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05", L_P3 => "2.000000E-07", }; run0002 => { Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05", W_N5 => "1.000000E-05", W_N7 => "1.000000E-05", f => "1.000000E+00", }; run0003 => { Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05", L_N1 => "2.000000E-07", L_N3 => "2.000000E-07", L_N5 => "2.000000E-07", }; run0004 => { Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05", L_N1 => "2.000000E-07", };

---

A mon avis tu veux tout separer, donc il faut deja revoir ta synthaxe du hach.


De plus si tu a une vrai table de hachage, le split n'est pas necessaire.
Afin d'avoir d'avoir toutes tes runs, mieux vaut utiliser

Code:

---

foreach my $run (keys %{$content})

---

Cela devrait déjà un peu t'aider je l'espère

Erf, excuse moi c'est une erreur dans mon post, j'ai voulu sauter des etapes pour ne pas trop le surcharger.
De base , tout mes runs sont separes par des "," cela implique que mon split marche nickel, c'est apres que je rajoute les ";" pour obtenir une bonne syntaxe de table de haschage.

Pour resumer j'ai tout mes runs qui sont conserver dans @evaluation. Ensuite mon probleme ce fait au niveau de "eval".
Du coup je voyais plus mon probleme a ce niveau :

Code:

---

1 2 3 4

run0000 => { Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05".................

---

Ne vaudrait il mieux pas :

Code:

---

1 2 3 4

run0000 = { Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05".................

---

??

La synthaxe d'un hach simple est:

Code:

---

1 2 3 4 5 6

my %run0000 = ( Cdum => "2*Cload", Cload => "5.000000E-12", IBIAS => "1.000000E-05" );

---