Bonjour,
 
je me permet de vous contacter car je suis amené à développer un script Perl (je n'ai jamais programmé en Perl et je dois avouer que je suis un peu dérouté par ce langage).
 
Après avoir ouvert un fichier XML, il devra le parcourir et stocker des données dans 3 tableaux différents. Pourriez-vous m'aider à réaliser ces deux actions.
 
Voici le format du XML (il y a un nombre variant et inconnu à l'avance de voitures):
 

Voila je voudrais que pour chaque voiture on récupère dans 3 tableaux l'Id, le Prix et la Couleur
 
Ainsi le premier tableau serait : Id Voiture1   Id Voiture 2   Id Voiture 3......
le deuxième : Prix voiture 1    Prix voiture 2 ....
troisième : Couleur Voiture 1   ...
 
Si quelqu'un pouvait m'aider ce serai vraiment cool.
 
Merci,
 
Lalalallal

Ici, on aide, on ne fait pas le boulot à votre place, donc montrez ce que vous avez fait et on vous dira ce qui ne va pas, surtout que c'est facile à faire, ça.
A+,

Bonsoir,
 
désolé pour le temps de réponse mais j'ai eu un petit imprévu hier qui m'a empêché de venir ici ^^
 
Voici ce que j'ai fait :

 
je n'arrive pas a récupérer ce qui suit ( $' ) sans la fin de la borne...
de plus je ne suis pas sur pour le "   /\<Id\>/   " et "   /\<Id\\\>/  "
 
Merci beaucoup,
 
Lalalallal
 
ps : ah oui comment est-ce que l'on fait pour créer une fonction qui prends en argument 3tableaux ?

Bon, un truc vite fait et loin d'être optimal:

#!/usr/local/bin/perl -w
use strict;
use warnings;
 
my (@tab1, @tab2, @tab3);
my $filename = "..."; # a vous de faire ce qu'il faut ici.
open (my $file, "<", $filename) or die $!;
while (<$file> ) {
    if (/\<Id\>([^<]*)\<\/Id\>/o) {push @tab1, $1;}
    if (/\<Prix\>([^<]*)\<\/Prix\>/o){push @tab2, $1;}
    if (/\<Couleur\>([^<]*)\<\/Couleur\>/o){push @tab3, $1;}
}
close $file;

Si vos champs sont sur plus d'une ligne, ce code ne fonctionnera pas (et il faudra employer un module avec un vrai parser xml), mais je na sais pas comment sont vos données
A+,

Bonsoir,
 
Merci beaucoup, le fichier xml est sur plusieurs lignes, on l'a généré comme ca pour pouvoir le modifier rapidement a la main avec le bloc note... (il a la meme tete que ce que j'ai donné ou qu l'on obtiendrai en l'ouvrant avec ie)
 
Encore merci pour ton aide
 
Lalalallal

Pour optimiser un peu, si tu n'as pas deux champ sur la même ligne dans tes données, tu peux remplacer
{push @tab1, $1;}
par  
{push @tab1, $1; next;}
Et pareil pour les deux autres lignes.
Ça évite de passer dans des tests inutiles.
A+,