perl script question.

Bernard El-Hagin zaphod at neostrada.pl
Sun Jan 11 01:46:15 PST 2004


Matthew Seaman wrote:
> On Sat, Jan 10, 2004 at 06:26:30PM -0500, Marty Landman wrote:
> > At 06:02 PM 1/10/2004, Matthew Seaman wrote:
> > >On Sat, Jan 10, 2004 at 11:39:07PM +0100, Bj?rn Andersson wrote:
> > >
> > >> If this occures more than once on a line we should have the line as this:
> > >>   perl -pi.bak -e 's/\s+\w+_\w+\.?//g;' filename
> > >
> > >Good point.  Also, if the stuff_separated_by_underscores wraps around
> > >onto more than one line, then there may not be any leading whitespace:
> > 
> > I don't see why the translate sol'tn that Gary Kline gave first isn't 
> > adequate.
> 
> Err --- Gary Kline was the OP asking how to do this: I think you mean 
> Bernard El-Hagin's solution?
> 
>     % perl -i.bak -pe 'tr/_/ /' <files>
> 
> That doesn't do the right thing.  It turns:
> 
>     "This is a sample ordinary sentence.  This_is_joined_up_with_underscores."
> 
> into:
> 
>     "This is a sample ordinary sentence.  This is joined up with underscores."
> 
> but the requirement is to produce:
> 
>     "This is a sample ordinary sentence."


Yes, I completely misread the question. Sorry.

-- 
Cheers,
Bernard


More information about the freebsd-questions mailing list