[Linux-Biella] Sed

[Claudio M.]

On Thu, 5 Feb 2004 16:41:05 +0100
"CIARROCCHI, Paolo, VF-IT" <Paolo.CIARROCCHI@vodafone.com> wrote:

> Zero fretta ;)

Eccolo

----- Inizio prg

#!/usr/bin/perl
                                                                        
while (<STDIN>) {
        s/a uno/A\tUNO/g;
	s/b due/B\tDUE/g;
        print;
}

---- Fine prg

la riga dopo il while duplicala per ogni sostituzione che vuoi fare

Bye