Discussion :

[medsup]

bonjour,
j'ai un fichier XML qui contient une collecte des autres fichiers XML. le but c'est de enregistrer chaque xml dans un fichier séparé pour être analyser par la suite.

le texte globale sous cette forme:

Code xml :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
<?xml-stylesheet type="text/xsl"?>
<?xml-stylesheet href="MeasDataCollection.xsl"?>
<measCollecFile xmlns="http://www.3gpp.org/ftp/specs/latest/rel-5/32_series/32432-610.zip#measCollec">
</measCollecFile>
<?xml version="1.0" encoding="UTF-8"?>
<?xml-stylesheet type="text/xsl"?>
<?xml-stylesheet href="MeasDataCollection.xsl"?>
<measCollecFile xmlns="http://www.3gpp.org/ftp/specs/latest/rel-5/32_series/32432-610.zip#measCollec">
</measCollecFile>
<?xml version="1.0" encoding="UTF-8"?>
<?xml-stylesheet type="text/xsl"?>
<?xml-stylesheet href="MeasDataCollection.xsl"?>
<measCollecFile xmlns="http://www.3gpp.org/ftp/specs/latest/rel-5/32_series/32432-610.zip#measCollec">
</measCollecFile>

j'ai pas collé les sous balises de <measCollecFile> parce que ça devient énorme.

quelques idées?

[medsup]

une question à part! j'ai un script qui parse un fichier xml! puis-je l’utiliser pour parser plusieurs xml écrits dans un seul fichier! (en testant j'ai eu des problème d'entête)

[Philou67430]

Ne manque-t-il pas une première ligne à ton exemple de fichier multixml ?

Code :

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

<?xml version="1.0" encoding="UTF-8"?>

Si l'on peut considérer ce marqueur comme séparateur de fichier, voici une solution pour spliter le fichier en plusieurs :

Code :

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

1
2
3
4
5
6
7
8
9
10
my $nb = 1;
my $OUT;
while (<>) {
  undef $OUT if /^<\?xml version>/;
 
  if (!defined $OUT) {
    open my $OUT, ">", $ARGV.$nb++.q(.xml) or die "Can't open file for writing: $!\n";
  }
  print { $OUT };
}

[medsup]

Ne manque-t-il pas une première ligne à ton exemple de fichier multixml ?

Code :

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

<?xml version="1.0" encoding="UTF-8"?>

oui il manque cette ligne

Si l'on peut considérer ce marqueur comme séparateur de fichier, voici une solution pour spliter le fichier en plusieurs :

Code :

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

1
2
3
4
5
6
7
8
9
10
my $nb = 1;
my $OUT;
while (<>) {
  undef $OUT if /^<\?xml version>/;
 
  if (!defined $OUT) {
    open my $OUT, ">", $ARGV.$nb++.q(.xml) or die "Can't open file for writing: $!\n";
  }
  print { $OUT };
}

j'ai exécuté le code en tapant perl script.pl mon_fich.xml
il me renvoi une erreur au niveau de print {$OUT};

[djibril]

Si le fichier XML globale est valide, un parseur XML ferait l'affaire en peu de lignes de codes, mais est-ce le cas ?

[medsup]

Si le fichier XML globale est valide, un parseur XML ferait l'affaire en peu de lignes de codes, mais est-ce le cas ?

avec quelques modifications, il est valide maintenant!

[djibril]

Peux-tu nous mettre un exemple de fichier valide, et je te mets le prog (je suis de bonne humeur aujourd'hui) !

[Philou67430]

Indiquer l'erreur m'aurait été utile.
En attendant, essaye en remplaçant

Code :

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

  print { $OUT };

par

Code :

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

  print { $OUT } $_;