Discussion :

[florent]

Bonjour,

exsite t-il un équivalent du range pattern sous awk en perl ? ou faut-il tout développer ?

ce que j'appelle range pattern c'est
awk '/debut/,/fin/ { traitement des données }' fichier

Merci

[philouelgeek]

Salut,

Ça dépend de des actions à réaliser dans le awk.

Par exemple si tu veux faire ce genre d'awk :

Code :

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

1
2
 
awk '/DEBUT/,/FIN/ {print $0}' fichier

Tu as la mise en forme suivante qui fonctionne :

Code :

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

1
2
3
4
5
6
7
 
open FILE,"< fichier" or die "Impossible d'ouvrir le fichier  !";
while(<FILE>)
{
print if /DEBUT/ .. /FIN/;
}
close FILE;

@++

[Mr6]

Le oneliner proposé par Schmorgluck :
http://www.developpez.net/forums/d87...s/#post4991437

@+
Mr6

[florent]

Je vais tester cela, sachant que j'ai traitement un peu poussé à faire avec les données entre les tags

Merci