REGEX : Extraction d'une substring

Bonjour,

j'ai une string qui peu prendre une des deux formes suivantes:

Code:

---

1 2 3 4

05-13-01-20-31 XY :13 TCB= F8700440 US= 00000000 SS= F8700D40 MS= F8700D40 ou 05-13-01-20-31 XY: 13 TCB= F8700440 US= 00000000 SS= F8700D40 MS= F8700D40

---

Après "XY" il y a le caractère ":" qui sera précédé ou succédé d'un espace

J'ai besoin d'extraire dans l'exemple ci-dessus, le chiffre 13 qui succède à XY

J'utilise la commande suivante:

Code:

---

1 2	($yy) = $string =~ m/XY\s:(.{2})|XY:\s(.{2})/;

---

mais dans le second cas (espace après les ":"), cela ne fonctionne pas et je n'arrive pas à trouver l'erreur.

Utilise plutôt une expression plus simple :

Code:

---

1 2	/XY\s*:\s*(\d+)/

---

Bonjour,

De mon coté je n'arrive pas à faire fonctionner ton expression régulière... Qu'est ce que tu as comme message ?

Sinon, j'ai essayé avec ça:

Code:

---

1 2	($yy) = $string =~ /XY[^0-9]*([0-9]{2}).*/;

---

Lilian.

La regexp de dimitry placée dans l'expression de mamax fonctionne pourtant parfaitement :

Code:

---

1 2	$string = "05-13-01-20-31 XY :13 TCB= F8700440 US=00000000 SS= F8700D40 MS= F8700D40"; ($yy) = $string =~ /XY\s*:\s*(\d+)/;

---

Merci à tous pour vos propositions

Bon, comme c'est le week end, cela attendra donc lundi.

@lilian_h
Dans le cas qui ne fonctionne pas, je n'ai pas de messages d'erreur, c'est juste que le prog me retourne rien dans $xy.