IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Perl Discussion :

PERL-XML Perser un fichier avec des atribut


Sujet :

Langage Perl

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Mai 2008
    Messages
    106
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2008
    Messages : 106
    Par défaut PERL-XML Perser un fichier avec des atribut
    Bonjour a tous,

    j'ai beau chercher une solution pou r mon problème mais sans sucée.

    je vous explique mon problème:
    j'ai un fichier XML que je doit parser avec perl et j’utilise XML:arser pour cela,dans mon fichier j'ai l'exemple suivant

    Code xml : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    <LieuNaissance>
    <div style="margin-left:40px"><Pays code="79000">FRANCE</Pays></div></LieuNaissance>
    <LieuNaissance>
    <div style="margin-left:40px"><Localite code="75000">Paris</Localite></div></LieuNaissance>
    <LieuNaissance>
    <div style="margin-left:40px"><Localite code="94300">Vincennes</Localite> 
    <Pays>FRANCE</Pays></div></LieuNaissance>
    <LieuNaissance>
    <div style="margin-left:40px"><Pays code="94300">France</Pays> 
    <Localite>Vincennes</Localite></div></LieuNaissance>

    dans l'exemple précédent c'est les quatre 4 de figure que je peut rencontré dans mon fichier XML et que je dois traité, et j'ai conçu le code suivant pour traité tout les cas de figure
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
     
    if ({LieuNaissance}->{Localite}->{'code'}){
    	$Cod_Nai =	{LieuNaissance}->{Localite}->{'code'};
    	if ({LieuNaissance}->{Localite}->{'content'}){$Vil_Nai =	{LieuNaissance}->{Localite}->{'content'};}
    	if ({LieuNaissance}->{Pays}){$Pays_Nai= {LieuNaissance}->{Pays};}			
    }
    elsif ({LieuNaissance}->{Pays}->{'code'}){
    	$Cod_Nai =	{LieuNaissance}->{Pays}->{'code'};
    	if ({LieuNaissance}->{Pays}->{'content'}){$Pays_Nai= {LieuNaissance}->{Pays}->{'content'};}
    	if ({LieuNaissance}->{Localite}){ $Vil_Nai = {LieuNaissance}->{Localite};}
    }
    mai c'est pas bon parce pour le 1er exemple il teste la balise localite dans elsif et comme elle n'existe pas il affect à $vil_nai la valeur HASH(0x1fdcc14)

    comment testé l'existance de balise et si elle n'existe pas alors il change pas de valeur a la variable, puisqu'elle est deja initialisé au début
    pourriez vous m'aidé svp, et merci d'avance

  2. #2
    Expert confirmé

    Homme Profil pro
    Ingénieur développement logiciels
    Inscrit en
    Avril 2009
    Messages
    3 577
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 59
    Localisation : France, Bas Rhin (Alsace)

    Informations professionnelles :
    Activité : Ingénieur développement logiciels
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Avril 2009
    Messages : 3 577
    Par défaut
    Pour moi, la syntaxe de tes if est incorrecte. Pourrais-tu montrer le reste du script ?

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Mai 2008
    Messages
    106
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2008
    Messages : 106
    Par défaut
    le script et assez long et je sais c'est pas ce que je met exactement.
    que ce que tu veux dire par syntaxe des if est incorrecte?
    pour le cas 1 j'ai met un print et il dans la dernier condition ou il devrai pas rentrer mai malheureusement il rentre dans la condition, tu pense a un oublie d’accolade ou quelque chose comme ça?

    PS: pour le cas 3 et 4 il m'affiche bien le bon résultat qui est 94300; Vincennes; France, mai pour le cas 1 il affiche 79000;HASH(0x1fd9cd4);France

  4. #4
    Expert confirmé

    Homme Profil pro
    Ingénieur développement logiciels
    Inscrit en
    Avril 2009
    Messages
    3 577
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 59
    Localisation : France, Bas Rhin (Alsace)

    Informations professionnelles :
    Activité : Ingénieur développement logiciels
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Avril 2009
    Messages : 3 577
    Par défaut
    Quand tu écris :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    if ({LieuNaissance}->{Localite}->{'code'}){
    Il manque une référence de variable devant le premier {

    Par ailleurs, on ne sait pas très bien comment tu utilises XML::Parser...

  5. #5
    Membre confirmé
    Profil pro
    Inscrit en
    Mai 2008
    Messages
    106
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2008
    Messages : 106
    Par défaut
    dans mon teste j'ai bien la référence, j’utilise xml comme suite:


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
     
    my $parser = XML::Simple->new( KeepRoot => 1 );
    ################# Traitement Reel ##############
    my $doc = $parser->XMLin($file_tmp);
     
    foreach my $Identif ( @{ $doc->{ReponseIdentificationRNIPP}
     
    if ($Identif->{LieuNaissance}->{Localite}->{'code'}){
    	$Cod_Nai =	$Identif->{LieuNaissance}->{Localite}->{'code'};
    	if ($Identif->{LieuNaissance}->{Localite}->{'content'}){$Vil_Nai =	$Identif->{LieuNaissance}->{Localite}->{'content'};}
    	if ($Identif->{LieuNaissance}->{Pays}){$Pays_Nai= $Identif->{LieuNaissance}->{Pays};}			
    }
    elsif ($Identif->{LieuNaissance}->{Pays}->{'code'}){
    	$Cod_Nai =	$Identif->{LieuNaissance}->{Pays}->{'code'};
    	if ($Identif->{LieuNaissance}->{Pays}->{'content'}){$Pays_Nai= $Identif->{LieuNaissance}->{Pays}->{'content'};}
    	if ($Identif->{LieuNaissance}->{Localite}){ $Vil_Nai = $Identif->{LieuNaissance}->{Localite};}
    }
    c'est de cela que tu veut parler?

    pour tester l’existence d'une balise c'est bien comme ça qu'on le fais

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    if ($Identif->{LieuNaissance}->{Localite}) {TRAITEMENT }

  6. #6
    Membre confirmé
    Profil pro
    Inscrit en
    Mai 2008
    Messages
    106
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2008
    Messages : 106
    Par défaut
    PS: j’utilise XML::SIMPLE
    je sais pas si c'est du a cela

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 4
    Dernier message: 04/06/2007, 15h28
  2. [ API JDIC ] Ouvrir un fichier avec des paramètres
    Par macmanus dans le forum API standards et tierces
    Réponses: 4
    Dernier message: 11/05/2007, 15h32
  3. Problème de chemin de fichier avec des espaces
    Par Akronyme dans le forum VB 6 et antérieur
    Réponses: 13
    Dernier message: 11/12/2006, 17h12
  4. Réponses: 6
    Dernier message: 29/11/2006, 11h56
  5. Réponses: 1
    Dernier message: 31/10/2006, 15h06

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo