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 :

syntaxe perl grep


Sujet :

Langage Perl

  1. #1
    Membre à l'essai
    Femme Profil pro
    Étudiant
    Inscrit en
    Novembre 2011
    Messages
    64
    Détails du profil
    Informations personnelles :
    Sexe : Femme

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Novembre 2011
    Messages : 64
    Points : 13
    Points
    13
    Par défaut syntaxe perl grep
    bonsoir,
    pouvez vous me dire a quoi sert cette fonction et les caractères utilisé le "." et le "+"

    grep { /.+/ }

    merci pour votre attention

  2. #2
    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
    Telle quelle, cette instruction ne fait rien. Il faudrait donner la ligne entière, le contexte.

    La fonction grep prend en entrée une liste d’éléments (ou un tableau) et renvoie un autre tableau dans lequel les éléments ont été filtrés par le code dans le bloc après le grep.

    Par exemple, le script uniligne suivant à la ligne de commande unix:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    $ perl -e 'print join " ", grep {$_ % 2} 1..10'
    1 3 5 7 9
    génère d'abord une liste de chiffres de 1 à 10; puis le grep filtre tous les éléments divisibles par 2 (le bloc {$_ % 2} renvoie 0, donc faux, pour les éléments divisibles par 2) et renvoie donc une liste de chiffres impairs entre 1 et 10; enfin, le 'print join " "' imprime les éléments renvoyés par le grep en ajoutant des espaces entre chaque élément (ce qui imprime donc "1 3 5 7 9").

    Dans ton cas, le bloc de code associé au grep utilise une expression régulière: '.' reconnaît un caractère quelconque (sauf le caractère de saut de ligne) et le '+' dit qu'il en faut au moins 1. Bref, /.+/ renvoie vrai s'il y a au moins un caractère (autre que saut de ligne) dans la chaîne examinée et faux dans le cas contraire. Et le grep avec ce bloc de caractère filtre les éléments vides de la liste en entrée et ne renvoie que les éléments non vides.

    Par exemple, si je définis le tableau @c comme suit:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    my  @c = (1, 5, "toto", 7, "", 36, "titi", "", 42);
    ce tableau contient maintenant:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    0  1
    1  5
    2  'toto'
    3  7
    4  ''
    5  36
    6  'titi'
    7  ''
    8  42
    Les éléments d'indices 4 et 7 sont vides.

    Si maintenant je fais l'instruction suivante:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    my @d = grep { /.+/ } @c;
    le tableau @d contient:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    0  1
    1  5
    2  'toto'
    3  7
    4  36
    5  'titi'
    6  42
    Les deux éléments vides ont été éliminés.

  3. #3
    Membre à l'essai
    Femme Profil pro
    Étudiant
    Inscrit en
    Novembre 2011
    Messages
    64
    Détails du profil
    Informations personnelles :
    Sexe : Femme

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Novembre 2011
    Messages : 64
    Points : 13
    Points
    13
    Par défaut
    merci beaucoup pour votre reponse

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

Discussions similaires

  1. perl grep extraction du mot exact
    Par djbad dans le forum Langage
    Réponses: 2
    Dernier message: 12/10/2014, 10h54
  2. Perl- Tester le résultat d'un grep
    Par dark_angel91 dans le forum Langage
    Réponses: 4
    Dernier message: 16/05/2011, 11h45
  3. grep en Perl
    Par Pauli dans le forum Langage
    Réponses: 1
    Dernier message: 19/07/2007, 15h11
  4. [PERL] un grep qui ne fonctionne pas bien
    Par LE NEINDRE dans le forum Langage
    Réponses: 6
    Dernier message: 03/11/2005, 16h37
  5. Réponses: 4
    Dernier message: 07/07/2005, 17h18

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