Discussion :

[danathane]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
  my $file = "$TEMPPATH/update.".$ENV{"CUTE_PID"}.".tmp";
  $xml = new XML::Simple;
 
  $data_hash = $xml->XMLin($file);

alors voilà mon soucis avec ce code. bon il marche bien mais au niveau de la récupération des données c'est le bazar.
Par exemple si dans mon XML j'ai une balise <test></test> sans rien au milieu et bien $data_hash->{test} va être égal à HASHx...... or il devrait égale à "" ou au pire à null.

Ma questione st donc, comment je peux faire dans ce cas là pour vérifier que cette pseudo valeur hash est un vide ou quelque chose de vraiment utile?

j'avais pensé à faire un tuc du genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
if(!($data_hash{$key} =~ /\W/)){
print "ok";
}else{
print "NOK";
}

Le soucis c'est que si j'ai un espace dans la valeur alors c mort... comment faire?

Merci d'avance pour votre aide.

[Philou67430]

D'abord, ne devrais-tu pas écrire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

$data_hash->{$key}

?
Ensuite, je ne comprends pas vraiment

$data_hash->{test} va être égal à HASHx...... or il devrait égale à "" ou au pire à null.

Pour tester si $data_hash->{test} est une référence à un hashage, tu peux faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
if (ref($data_hasl->{test} eq "HASH") {
  ...
}

mais je ne suis pas sur de bien avoir compris