Script de décomposition de date

Bonjour,

J'ai un fichier xml dont chacun des éléments ressemble à ça :

Code:

---

1 2 3 4 5 6

<even> <piece famille="Chambre">302F</piece> <event famille="Matériel">Latte lit cassée</event> <date>14/3/2007</date> </even>

---

Et j'en ai plus de 400, je voudrais pouvoir les transformer comme ça :

Code:

---

1 2 3 4 5 6 7

<even> <piece famille="Chambre">302F</piece> <event famille="Matériel">Latte lit cassée</event> <jour>14</jour> <mois>3</mois> </even>

---

Donc en fait décomposer la date en jour, mois et oublier l'année.

Je veux faire ça avec un script mais je connais pas trop, est ce que quelqu'un sait comment s'y prendre?
Merci.

Tu ne peux pas faire ça en .bat... Tu pourrais utiliser XSLT, mais c'est un peu lourd.
Une solution en Perl avec XML::Twig :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

#! /usr/bin/perl use strict; use warnings; use XML::Twig;   my $twig= new XML::Twig( twig_handlers => { date => \&date } );   $twig->set_pretty_print( 'indented'); $twig->parsefile( shift );   sub date { my ($twig, $date) = @_;   my ($day, $month) = split '/', $date->text; XML::Twig::Elt->new( 'jour', $day)->paste('before', $date); XML::Twig::Elt->new( 'mois', $month)->paste('before',$date);   $date->delete;   $twig->flush; }

---

En gros si j'explique ce que le code fait : il charge le document xml (spécifié en ligne de commande), pour chaque élément "date" il découpe son texte selon les "/", récupère le jour et le mois, crée les éléments correspondants, supprime l'élément "date" et imprime le document jusque là, puis continue.

Si tu demandes du .bat je suppose que tu es sur Windows ? Dans ce cas télécharge ActivePerl et installe XML::Twig en tapant "ppm install XML::Twig" en ligne de commande.

--
Jedaï

Impec c'est ça! merci