Bonjour à tous,

J'ai un programme perl qui lit un fichier texte, je dois faire une recherche et ressortir toutes les lignes qui correspondent à ma demande :

Ma chaîne doit contenir 3 textes séparé uniquement par 2 signes "-", chaque morceau de texte doit finir par la lettre X

(Ex : LKX-JKJJXXX-XKJLX est valide, mais X-X-X ou XXX-XVX-XX aussi)

Je n'arrive pas à obtenir mon résultat, j'ai essayer plusieurs expressions sans succès comme :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
if ($chaine =~ /X-*X-*X$/) { 
#code
}
Mais il ne me sort pas les bons résultats, il me sort également les lignes avec plus de 2 signes "-", j'ai vu que pour rechercher x élément on peut utiliser : -{2} mais je n'arrive pas a lier la recherche des X et du nombre de signes "-" présent dans la ligne à rechercher. En espérant avoir été clair.