retour bizarre xml::simple
Code:
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:
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.
