Bonjour à tous,


Je vous explique d'abord ce que je cherche à faire.

Voici un fichier dont le contenu est:

[ticket 1]
xxxxxxxxxxxxx
zzzzzzzzzzzzzz
rrrrrrrrrrrrrrrrrCHAINE_RECHERCHErrrr
tttttttttttttttttttt
[ticket 2]
fffffffffffffffffffffff
bbbbbbbbbbbb[0]bbbb
ccccccccc[1]ccccccccccccCHAINE_RECHERCHE
rrrrrrrrrrrrrrrrrrrrrrrrrrr[2]rrrrrrrrr
[ticket 3]
ddddddddddddd
zzzzzzz
[ticket 4]
cccccc
tttttttttttttt
ooooooooCHAINE_RECHERCHE
ppppppppp


Mon objectif en perl est de retourner le contenu des tickets contenant CHAINE_RECHERCHE, donc le resultat sera:

[ticket 1]
xxxxxxxxxxxxx
zzzzzzzzzzzzzz
rrrrrrrrrrrrrrrrrCHAINE_RECHERCHErrrr
tttttttttttttttttttt
[ticket 2]
fffffffffffffffffffffff
bbbbbbbbbbbb[0]bbbb
ccccccccc[1]ccccccccccccCHAINE_RECHERCHE
rrrrrrrrrrrrrrrrrrrrrrrrrrr[2]rrrrrrrrr
[ticket 4]
cccccc
tttttttttttttt
ooooooooCHAINE_RECHERCHE
ppppppppp


Est ce que quelqu'un peut me donner un coup de main svp ?


Merci d'avance!