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 :

Récupérer une liste de valeur encadrée par un délimiteur


Sujet :

Langage Perl

  1. #1
    Membre habitué
    Profil pro
    Inscrit en
    Mars 2005
    Messages
    151
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2005
    Messages : 151
    Points : 144
    Points
    144
    Par défaut Récupérer une liste de valeur encadrée par un délimiteur
    Bonjour,

    Etant donné une chaine de type :" -BEGIN MARQUEUR1 -BEGIN MARQUEUR2 val11 val12 val13 -END MARQUEUR2 -BEGIN MARQUEUR2 val21 val22 val23 -END MARQUEUR2 -END MARQUEUR1 "

    Le marqueur 1 délimite un type d'objet qui contient une liste d'objet de type marqueur 2 (oui je sais ce type de string pour envoyer/recevoir des objets c'est pas top ... patatécépamafotetcécomsa)

    J'ai essayé un truc du genre (désolé la machine où je code n'est pas la même où j'écris ce post, donc il peut y avoir des erreur de syntaxe):
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
     
    [...]
    print "----- new objet 1 -----\n";
    $ligne=chaine de l'exemple.
    my ($type1) = $ligne =~/-BEGIN MARQUEUR1 (.*) -END MARQUEUR1/;
     
    while($type1 =~ m/-BEGIN MARQUEUR2 (.*) -END MARQUEUR2/g)
    {
       print "obj2 : [$1]\n";
    }
    [...]
    Je m'attendais à e que ça m'affiche ça :
    ----- new objet 1 -----
    obj2 : var11 var12 var13
    obj2 : var21 var22 var23
    Mais ça m'affiche
    ----- new objet 1 -----
    obj2 : var11 var12 var13 var21 var22 var23
    Alors, je crois comprendre mon erreur (mon expression régulière var chercher la fin de marqueur 2 "au plus loin" et pourquoi ça m'affiche ça. Mais en revanche, je ne vois pas du tout quoi faire, en m'aidant des regex, pour avoir le résultat voulu.

    J'ai l'impression d'être bloqué par un grain de sable et j'avoue ne pas aimer ça )

    Si il y avait une bonne âme pour m'aider ça serait top !

    Cordialement,

  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 : 58
    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
    Points : 5 753
    Points
    5 753
    Par défaut
    Essaye en ajoutant ? après .* dans tes regexp : de cette manière, le .* n'est pas "glouton", c'est à dire qu'au lieu de cherche la chaine la plus longue, il cherchera la chaine la plus courte, ce qui donnera une chance pour trouver d'autres fois le motif recherché.
    Plus j'apprends, et plus je mesure mon ignorance (philou67430)
    Toute technologie suffisamment avancée est indiscernable d'un script Perl (Llama book)
    Partagez vos problèmes pour que l'on partage ensemble nos solutions : je ne réponds pas aux questions techniques par message privé
    Si c'est utile, say

  3. #3
    Membre habitué
    Profil pro
    Inscrit en
    Mars 2005
    Messages
    151
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2005
    Messages : 151
    Points : 144
    Points
    144
    Par défaut
    Merci Philou67430 pour ta réponse mais en fait je viens tout juste de vraiment comprendre pourquoi je me trompais.

    C'est à cause du caractère " " qui est présent entre 2 objets de type 2
    " -BEGIN MARQUEUR1 -BEGIN MARQUEUR2 val11 val12 val13 -END MARQUEUR2[ICI]-BEGIN MARQUEUR2 val21 val22 val23 -END MARQUEUR2 -END MARQUEUR1 "

    Du coup, mon expression était fausse. Je viens de corriger en prenant en compte ce blanc et ça marche nickel.

    Par contre, je garde en tête le truc du "?" pour ne pas rendre le ".*" glouton.

  4. #4
    Rédacteur/Modérateur

    Avatar de Lolo78
    Homme Profil pro
    Conseil - Consultant en systèmes d'information
    Inscrit en
    Mai 2012
    Messages
    3 612
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Conseil - Consultant en systèmes d'information
    Secteur : High Tech - Opérateur de télécommunications

    Informations forums :
    Inscription : Mai 2012
    Messages : 3 612
    Points : 12 469
    Points
    12 469
    Billets dans le blog
    1
    Par défaut
    Peux-tu montrer ton nouveau code?

    Parce que je pense que la correction proposée par Philou (quantificateur non glouton) doit rester nécessaire. Je suis donc un peu surpris que ton code fonctionne sans cela.

  5. #5
    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 : 58
    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
    Points : 5 753
    Points
    5 753
    Par défaut
    Je n'avais pas osé poser la question... mais c'est vrai que ça laisse perplexe.
    Plus j'apprends, et plus je mesure mon ignorance (philou67430)
    Toute technologie suffisamment avancée est indiscernable d'un script Perl (Llama book)
    Partagez vos problèmes pour que l'on partage ensemble nos solutions : je ne réponds pas aux questions techniques par message privé
    Si c'est utile, say

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

Discussions similaires

  1. [XL-2010] Récupérer une liste avec valeurs uniques depuis une colonne
    Par Onkas81 dans le forum Excel
    Réponses: 5
    Dernier message: 08/08/2013, 18h46
  2. Réponses: 0
    Dernier message: 06/06/2012, 10h26
  3. Réponses: 0
    Dernier message: 08/06/2011, 13h45
  4. Réponses: 8
    Dernier message: 15/12/2009, 11h04
  5. Réponses: 2
    Dernier message: 29/06/2007, 14h49

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