Le 13/09/07, Edgar Bonet<guilde@???> a écrit :
[...]
> Je pense qu'il faudra toujours que tu trouves des repères non équivoques
> pour repérer la partie qui t'intéresse. Par exemple :
>
> #!/usr/bin/perl
>
> # Delimit section of interest.
> $mark_start = 'eth0';
> $mark_end = '^$';
>
> $in_preface = 1;
> while (<>) {
>
> # Find the right section.
> next if $in_preface and ! /$mark_start/;
> $in_preface = 0;
> last if /$mark_end/;
>
> # Do whatever processing is needed...
> print;
> }
>
> Les repères que j'ai pris ('eth0' et '^$) marchent sur ton exemple. Mais
> tu peux avoir intérêt, comme le suggère Frédéric, à mettre dans le
> fichier des repères plus explicites.
y'a pas dire : les mongueurs ont tous la même façon de bosser :)
PK
--
|\ _,,,---,,_ Patrice KARATCHENTZEFF
ZZZzz /,`.-'`' -. ;-;;,_ mailto:p.karatchentzeff@free.fr
|,4- ) )-,_. ,\ ( `'-' http://p.karatchentzeff.free.fr
'---''(_/--' `-'\_)
