sed application?

David A. Sinck plug-discuss@lists.plug.phoenix.az.us
Thu, 13 Feb 2003 16:02:29 -0700


\_ SMTP quoth Mike Starke on 2/13/2003 13:03 as having spake thusly:
\_
\_ I have a case where I need to change the value
\_ of a variable in a number of Perl scripts.
\_ 
\_ How would I take the results of a grep command
\_ and apply a change to it? For instance, if I
\_ issue the command:
\_ 
\_ 'grep -r smtp_addr *'
\_ 
\_ and get a bunch of results like:
\_ 
\_ 1stfile: $smtp_adrr = "old_value";
\_ 2ndfile: $smtp_adrr = "old_value";
\_ 3rdfile: $smtp_adrr = "old_value";
\_ 4thfile: $smtp_adrr = "old_value";

perl -pi.bak -e 's/(smtp_addr = ").*?"/$1new_value"/g' files*

David