Discussion :

[YanK]

Bonjour,

Ma question est sûrement bête mais j'ai beau chercher je trouve pas comment faire.

Voici mon problème :
J'utilise des expressions régulières dynamiques, en gros je ne sais pas ce qui la compose.

Code :

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

$myTxt =~ /$regex/

Elle peut donc contenir plusieurs parenthèses, au final je peux avoir plusieurs résultats $x ($1, $2, $3 ...).
J'aimerais les mettre dans une liste pour les traiter plus loin dans mon script.

Comment récupérer tous ces résultats ?

J'ai bien essayé ceci mais ça ne marche pas :

Code :

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

1
2
3
4
5
6
7
if($myTxt =~ /$regex/) {
my $x = 1;
while (defined(${$x})) {
  print '$'.$x.' = '.${$x}.'\n';
  $x++;
}
}

Je suis sur que la soluce est simple mais là je déclare forfait.

Merci d'avance pour l'aide que vous pourrez m'apporter.
Yannick

[Jasmine80]

Elle peut donc contenir plusieurs parenthèses, au final je peux avoir plusieurs résultats $x ($1, $2, $3 ...).
J'aimerais les mettre dans une liste pour les traiter plus loin dans mon script.

Code :

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

1
2
3
if (my @values = ($text =~ m/$regexp/)){
    map {print "$_\n"} @values;
}

Quand tu fais

Code :

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

$text =~ m/$regexp/

cela te renvoie un array quelque soit le nombre de valeurs retournées. Il est donc très simple de récupérer le tout via @values comme je le fais.




Pour ce qui est du fait de stocker une expreg dans une variable, tu peux lire le post http://www.developpez.net/forums/sho...d.php?t=592489 parlant de qr// permettant de stocker une regex précompilée dans une variable

[YanK]

Merci Jasmine80.
J'ai été trop bête sur ce coup. C'était si simple, je me suis vraiment torturé l'esprit pour rien.

Encore merci.