On Sat, Jan 10, 2004 at 02:10:36PM -0800, Gary Kline wrote:
> 
>       Folks,
> 
>       Let's see if perl can do this one; it's as obscure a task
>       as I've run into.  I have scores of files with:
> 
>       A regular sentence, or phrase. then_one_containing_underscores_-
>       between_each_word  Followed by another regular, space-delimited
>       sentence.  Followed_by_another_string_with_underscaores.
> 
>       Is there a perl way to get rid of the
>       string_containing_underscores and leave the regular sntences??
> 

    perl -pi.bak -e 's/\s+\w+_\w+\.?//;' filename

        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

Attachment: pgp00000.pgp
Description: PGP signature

Reply via email to