Manipulation d'un fichier XML avec Perl

Bonjour,

J'utilise XML::Simple pour parser un fichier "simple", qui pourrait être dans le genre :
<super>

<user>

<nom>Machin</nom>
<prenom>Bidule</prenom>

</user>
<user>

<nom>machine</nom>
<prenom>trucmuche</prenom>

</user>

</super>

Je le lis parfaitement, je peux modifier certaines valeurs, et en ajouter, et je peux tout balancer dans un fichier texte comme il faut avec XMLout. Jusque là tout allait bien, mais j'ai cherché à supprimer des données de ce fichier..

J'ai utilisé l'option ForceArray => 1 dans XMLin pour que ce soit plus simple, mais si je fais :
$tree->{user}[$index] = "" ou = undef, avec $index l'index du user que je veux virer et que je dumpe, je me retrouve avec un fichier comme suit :

<super>

<user>

<nom>Machin</nom>
<prenom>Bidule</prenom>

</user>
<user>
</user>

</super>

alors que je voudrais que mon <user></user> soit supprimer aussi.. A la fois ça me parait assez logique comme comportement, mais je vois pas comment remonter d'un cran.. Je sèche un peu, peut-être auriez vous des pistes.

Merci

Essaie un truc comme ça :

Code:

---

splice @{$tree->{user}}, $index, 1;

---

--
Jedaï

ça à l'aire de passer.. c'est bizarre parceque j'avais essayé ça :

Code:

---

1 2	splice(@{$tree->{$user}}, $index, 1);

---

c'est à dire quelque de très proche (outre les parenthèses) et ça n'avait pas l'aire de vouloir le faire..

Merci pour ton aide

Les deux formes sont strictement équivalentes, sauf si le $user à la place de user n'est pas une faute de frappe sur le forum...

--
Jedaï