perl script question.

[Matthew Seaman]

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."

	Cheers,

	Matthew	


-- 
Dr Matthew J Seaman MA, D.Phil.                       26 The Paddocks
                                                      Savill Way
PGP: http://www.infracaninophile.co.uk/pgpkey         Marlow
Tel: +44 1628 476614                                  Bucks., SL7 1TH UK
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 187 bytes
Desc: not available
Url : http://lists.freebsd.org/pipermail/freebsd-questions/attachments/20040110/5b4ae557/attachment.bin