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