Re: modification d'une partie d'un fichier texte...

Top Page

Reply to this message
Author: Edgar Bonet
Date:  
To: guilde
Subject: Re: modification d'une partie d'un fichier texte...
Le jeudi 13 septembre, Frédéric BOITEUX a écrit :
> Juste un point : dans ton exemple, si je ne m'abuse, la
> préface/postface est poubellisée ? ?


Oui, c'est pas ce que tu voulais ? ;-)

Voici un exemple qui édite le fichier sur place (enfin, pas vraiment sur
place, il change d'i-node) :

    #!/usr/bin/perl -i


    # Delimit section of interest.
    $mark_start = 'eth0';
    $mark_end = '^$';


    $in_preface = 1;
    $in_postface = 0;
    while (<>) {


        # Find the right section.
        if ($in_postface or $in_preface and ! /$mark_start/) { next; }
        $in_preface = 0;
        if (/$mark_end/) { $in_postface = 1; next; }


        # Do whatever processing is needed...
        s/0/(zero)/g;    # dumb example


    } continue { print; }


Edgar.