[Perl] Besoin d'un ti coup de pouce pour une regexp

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [Perl] Besoin d'un ti coup de pouce pour une regexp

burgergold

5$? va chez l'diable!

je dois vérifier que le nom de fichier/dossier est /bromont/urgence ou à l'intérieur de celui ci

donc:

/bromont/urgence [#2aff00]ok[/#2aff00]
/bromont/urgence/ [#2aff00]ok[/#2aff00]
/bromont/urgence/toto.txt [#2aff00]ok[/#2aff00]
/bromont/urgence2 [#f0000e]pas ok[/#f0000e]

ca devrait donner un truc comme ca

Code :

/^\/bromont\/urgence/

mais ya un si y'a un / après urgence, c'est ok. Par contre, si yen a pas, faut que ca soit la string exact

présentement je le fais en 2 checks

Code :

$file->name eq "/bromont/urgence" || $file->name =~ m/\/bromont\/urgence\//

mais j'aimerais bien le faire en 1 regexp.

merci

Publicité

anapajari

s/travail/glanding on hfr/gs;

pas vérifiée:

Code :

/^\/bromont\/urgence($|\/)/

burgergold

5$? va chez l'diable!

anapajari a écrit :

pas vérifiée:

Code :

/^\/bromont\/urgence($|\/)/

merci je test

burgergold

5$? va chez l'diable!

semble fonctionner à merveille

merci

anapajari

s/travail/glanding on hfr/gs;

my pleasure

FORUM HardWare.fr

Programmation

Perl

[Perl] Besoin d'un ti coup de pouce pour une regexp

Sujets relatifs
Pb perl	besoin d avis sur la fesabilite de la chose.
[perl] Faire une page d'attente en CGI	bEsoin d un avis
perl et linux	Besoin d'informations sur fread()
perl et df	[PERL] supprimer un caractere d'une chaine
ssh et perl	[Perl] Aide pour logique en POO
Plus de sujets relatifs à : [Perl] Besoin d'un ti coup de pouce pour une regexp

Page générée en 0.042 secondes