Aide sur fonction Grep sur un tableau contenant des regex

Bonjour,

J'ai un problème pour retourner une liste d'url d'un tableau.
J'ai donc un tableau comme ceci :

Code:

---

1 2 3 4 5

http://www.toto.fr/dossier[1|2]/index.html http://www.titi.fr/dossier/index.html http://www.toto.fr/dossier1/index.html http://www.toto.fr/dossier2/index.html http://www.titi.fr/

---

Quand je fait un grep sur "http://www.toto.fr/dossier1/index.html"

J'aimerai que le grep me retourne : http://www.toto.fr/dossier[1|2]/index.html et http://www.toto.fr/dossier1/index.htm

Avec mon code il ne me retourne que http://www.toto.fr/dossier1/index.html

Voilà mon code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

#!/usr/bin/perl use strict; use Data::Dumper;   my @url = qw("http://www.toto.fr/dossier[1|2]/index.html" "http://www.titi.fr/dossier/index.html" "http://www.toto.fr/dossier3/index.html" "http://www.toto.fr/dossier4/index.html" "http://www.titi.fr/");   my $addr = "http://www.toto.fr/dossier1/";   my @result = grep { /$addr/ } @url;   print Dumper @result;

---

Merci d'avance pour votre aide
Franpom

Euh, ça me paraît parfaitement normal que si ta regex contient "http://www.toto.fr/dossier1/", elle ne puisse reconnaître la chaîne "http://www.toto.fr/dossier[1|2]/index.html": la regex échoue dès qu'elle voir le "[" dans la chaîne puisque tu spécifies qu'il doit y avoir un 1 à cet emplacement.

Bonsoir,

En regex http://www.toto.fr/dossier[1|2]/index.html correspond à soit http://www.toto.fr/dossier1/index.html soit http://www.toto.fr/dossier2/index.html
le [1|2] signifie caractère 1 ou 2.

Franpom

D'accord, c'est un peu ce que je soupçonnais, mais je n'étais pas du tout sûr, je n'arrivais pas vraiment à comprendre ce que tu cherchais à faire. En fait, il semble y avoir une grosse confusion de ta part, le problème est simplement que tu intervertis la chaîne de caractères à reconnaître et la regex censée la reconnaître.

Considère l'exécution du script à la ligne de commande suivant:

Code:

---

1 2 3 4 5 6 7

$ perl -e ' my @url = qw(http://www.titi.fr/dossier/index.html http://www.toto.fr/dossier2/index.html http://www.toto.fr/dossier1/index.html http://www.titi.fr/); my $regex = qr{http://www.toto.fr/dossier[12]}; print join "\n", grep { /$regex/ } @url ' http://www.toto.fr/dossier2/index.html http://www.toto.fr/dossier1/index.html

---

En mettant la classe de caractère "[12]" (pas besoin dans une classe de caractère du "|" qui sert à autre chose) dans la regex et non dans la chaîne de caractères à reconnaître, la regex reconnaît bien les deux noms de fichiers recherchés.