Perl

Fichier XML Ajout/Suppression de ligne

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Fichier XML Ajout/Suppression de ligne

Sethenssen

Bonjour,

Je débute dans l'utilisation de commande shell/perl, j'essai un maximum de récupérer ici et là des bout de ligne de code pour réussir ce que je souhaite mais maintenat ça coince.

Mon but est de concaterner des fichiers XML, de supprimer des lignes avec un contenu précis, les lignes vides et ajouter une ligne en début et fin de fichier de résultat. Ceci pour traiter cet XML directement dans Excel.

Déjà je fais du ligne par ligne dans un nouveau fichier résultat, je voudrais aussi apprendre à executer toutes ces lignes en un seul programme.

Setup:
J'utilise Cygwin sur ma machine (PC, Windows XP)
Donc je concatene tout mes XML en 1 fichier.

cd /cygdrive/d/Files/_.files/xml/

Code :

cat *.xml.success > test.xml

Ensuite je veux supprimer ce qui commence par <?xml version="1.0" encoding="UTF-8"?>
perl -ne 'print unless /<?xml ver/' test.xml > test1.xml

Je veux supprimer toutes les lignes vides de mon fichier

Code :

cat test1.xml | tr -s '\n' > test2.xml

Mais ceci ne marche pas.

Après cela coince car certaines lignes commence par un espace, ou avec des balises </ et cela ne marche pas avec

Code :

perl -ne 'print unless /'</PurchaseProvider>'/' test.xml > test2.xml

Expected Result:
- Supprimer toutes les lignes vides
- Supprimer toutes les lignes qui contiennent "<VODContentProvider" (la ligne entière, pas seulement ces caractères dans la ligne, mais bien la ligne entière dès qu'il y a ces caractères)
- Supprimer toutes les lignes qui contiennent "</VODContentProvider" (idem)
- Supprimer tout les commentaires du fichier "<!-- Métada"
- Supprimer toutes les lignes qui contient "xmlns:xsi="http"
- Supprimer toutes les lignes qui contient "xsi:noNamespaceSchemaLocation"

Une fois épuré rajouter ces 2 lignes pour qu'Excel puisse le traiter.
Au début du fichier:
- <VODContentProvider id="TST" name="TEST" scheduleDate="2008-05-27T16:10:06Z"
En fin de fichier:
- </VODContentProvider>

Tout ceci sur mon fichier concaténé test.xml, et si possible en utilisant simplement via cygwin en executant un script qui contient tou ce nettoyage.
Exemple:
./script_nettoyage.pl

Exemple d'un début de fichier XML:

Code :

<?xml version="1.0" encoding="UTF-8"?>
<VODContentProvider id="TST" name="TEST" scheduleDate="2008-05-27T16:10:06Z"
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
xsi:noNamespaceSchemaLocation="VODContentProviderMultiProduct_2.4.xsd">
<Content id="TST0100000005" title="Titre de film" duration="6300" action="override">
<EpgDescription locale="fr_FR">
<EpgElement key="Title">Titre de film</EpgElement>
<EpgElement key="Synopsis">synospis</EpgElement>
<EpgElement key="Description">description</EpgElement>
<EpgElement key="ShortTitle">Titre de film</EpgElement>
<EpgElement key="Copyright">TEST</EpgElement>
</EpgDescription>
<EpgDescription>
<EpgElement key="Rating">0</EpgElement>
<EpgElement key="IsRecordable">0</EpgElement>
<EpgElement key="AudioPID">zho</EpgElement>
<EpgElement key="Directors">Chu Yuan</EpgElement>
<EpgElement key="Actors">Lily Li,Tsung Hua</EpgElement>
<EpgElement key="Year">1973</EpgElement>
<EpgElement key="Language">zho</EpgElement>
<EpgElement key="PromoImage">TST0100000005.jpg</EpgElement>
<EpgElement key="Categories">Action</EpgElement>
<EpgElement key="Countries">CN</EpgElement>
<EpgElement key="Subtitles">fra</EpgElement>
</EpgDescription>
<Media id="TST0000000005" title="Titre de film ts" fileName="TST0000000005.mpg" frameDuration="157500" action="override" />
</Content>
<VodItem id="TST0400000005" title="Titre de film" broadcasterId="TST" previewDate="2008-05-20T02:33:20Z" contentRef="TST0100000005" nodeRefList="TSTFRA1002" action="override">
<EpgDescription locale="fr_FR">
<EpgElement key="Title">Titre de film</EpgElement>
<EpgElement key="DisplayPriority">100</EpgElement>
</EpgDescription>
<Period start="2008-05-27T22:00:00Z" end="2008-11-21T22:59:59Z"/>
</VodItem>
<Product id="TST0500000005" currency="EUR" price="3.99" rentalDuration="172800" type="single" regions="France" >
<AddToProduct elementKind="VodItem" elementId="TST0400000005"/>
</Product>
</VODContentProvider>
<?xml version="1.0" encoding="UTF-8"?>
<VODContentProvider id="TST" name="TEST" scheduleDate="2008-06-20T12:50:17Z">

Actual Result:
Je ne réussi qu'a concatener et supprimer des lignes qui commence sans espace et sans commencer par </
Donc pas terrible.

Si un demi dieu de perl/grep/sed ou autre peut m'aider cela m'enleverai une énorme épine du pied et me ferait gagner un gain de temps énorme vous ne pouvez pas imaginer.

Merci d'avance,
Je suis disponible pour toutes questions si besoin.

Publicité

anapajari

s/travail/glanding on hfr/gs;

question 1 : t'es obligé de te servir de bash ET de perl ou tu peux tout faire en perl si tu as envie?
question 2 : tu as le droit de te servir de module de la CPAN? (genre simpleXML)

---------------
Software and cathedrals are much the same - first we build them, then we pray.

Sethenssen

Bonsoir,

Peut importe du moment que j'arrive au résultat escompté.

Je ne connais pas du tout, mais idem que ma réponse 1.

FORUM HardWare.fr

Programmation

Perl

Fichier XML Ajout/Suppression de ligne

Sujets relatifs
Bien organiser ses fichier flash CS3	[VB.NET] Fichier txt vers excel
Fichier de config d'une assembly dans un projet web	Mauvaise reconnaissance de la fin d'un fichier
SQL Server - BULK INSERT sur un fichier csv avec guillemets	Recherche de caractère dans un nom de fichier
Paramètres pour fichier bat a l'ouverture de session	[Résolu] Batch confirmation d'ajout d'une imprimante en réseaux !
Impossible de lire le code VBA d'un fichier Excel avec Excel 2007	convetir fichier excel /html puis l'envoyer.tout cela en ligne de cmde
Plus de sujets relatifs à : Fichier XML Ajout/Suppression de ligne

Page générée en 0.051 secondes