Regular expression qui ne fonctionne pas

Bonjour,

J'ai deux chaines: strA et strB

strA contient: "blabla;%HOME%\bin;blabla"
strB contient: ";%HOME%\bin"

l'expression $strA =~ /$strB/i me retourne rien...

la chaîne contenu dans strB est entré en dur dans le code, alors je n'ai pas oublié de doubler les \. Ca ne fonctionne toujours pas.

Cependant en quadruplant les \ cela fonctionne mais du coup quand j'écris la chaine à la suite de strA j'obtiens des \\ au lieu des \...

Somebody can help me? please :)

Primo, toujours utiliser des simple quotes ' plutôt que des doubles " si tu n'as pas explicitement besoin des doubles (interpolation, ou usage de caractères spéciaux comme \n). Ca t'évitera bien des drames... Par exemple ici :

Code:

---

$strB = ";%HOME%\bin"

---

%HOME est interprété comme un hash, et \b comme un backspace...

Code:

---

$strB = ';%HOME%\bin'

---

sera bien plus correct

Deuxio, lorsque tu veux intégrer une variable "texto" dans une regex, utilise quotemeta() ou les équivalents \Q et \E. Par "texto" je veux dire si tu veux matcher exactement le texte contenu dans ta variable, et pas une regex dont le contenu serait celui de ta variable (dont les caractères prendraient alors des sens particuliers) :

Code:

---

$strA =~ /\Q$strB\E/i;

---

ou

Code:

---

1 2	my $rStrB = quotemeta( $strB ); $strA =~ /$rStrB/i;

---

Si tu respectes ces deux règles, tu devrais obtenir un résultat correct.

--
Jedaï

T'es un Dieu!

merci :)