RE: Scripting help please

["Collins, Kevin [MindWorks]" <KCollins chevrontexaco com>]

Useless use of cat! Try:

 perl -F\\$ -nae '$F[1] =~ s/,/*/g; print join("\$", @F)' file

Kevin

-----Original Message-----
From: taroon-list-bounces redhat com
[mailto:taroon-list-bounces redhat com] On Behalf Of Josh Kelley
Sent: Wednesday, May 04, 2005 6:20 AM
To: Truejack; Discussion of Red Hat Enterprise Linux 3 (Taroon)
Subject: Re: Scripting help please


Truejack wrote:

>I have a file which has the following output.
>I need to change all the commas after the $ to a * (or any other
>character other than a comma).
>Only the commas after the $ need to be changed.
>
>109889-01 : 109353-04,109353-04 :  :  $ SUNWkvmx, SUNWkvm, SUNWctu,
SUNWmdb
>  
>
cat file | perl -F\\$ -nae '$F[1] =~ s/,/*/g; print join("\$", @F)'

Josh Kelley

--
Taroon-list mailing list
Taroon-list redhat com
http://www.redhat.com/mailman/listinfo/taroon-list