Re: Scripting help please

[Josh Kelley <josh jbc edu>]

This seems to work, but I'm a lot more comfortable working in perl than 
just the shell, so I'd recommend checking it to make sure:

IFS='$'; cat filename | (while read before after; do after=`echo $after 
| sed 's/,/*/g'`; echo "$before\$$after"; done)

Josh Kelley

Truejack wrote:

> Reply, I can't use perl.
>
> The machine does have Perl. I need to accomplish this using sed and
> awk, or some inbuilt Linux command.
>
> On 5/4/05, Josh Kelley <josh jbc edu> wrote:
>  
>
> > 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
> >
> >