Discussion :

[Bahan_auboulot]

Hello.

Je code en Perl 5.10.2 et j'ai un petit soucis avec les expressions régulières. En fait, suivant la valeur d'une certaine variable , j'aimerais faire varier mon expression régulière.

Par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
if($iMaVar == 1)
{
    $sExpReg = ^$MaChaine.*$;
}
else
{
    $sExpReg = ^.*$MaChaine.*$;
}
 
if($sLigne =~ /$sExpReg/)
{
    print "Chaine trouvee";
}

Avec une boucle while pour parcourir le fichier, dans le premier cas, je ne recherche que les lignes commençant par $MaChaine. Dans le second cas, je recherche toutes les lignes contenant $MaChaine.

Pensez-vous que cela soit possible ?

Cdt.

Bahan

[Jedai]

C'est évidemment possible, mais la notation est qr// :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
if($iMaVar == 1)
{
    $sExpReg = qr/^$MaChaine.*$/;
}

--
Jedaï

[Bahan_auboulot]

Merci beaucoup !!

Cdt.

Bahan