From owner-freebsd-questions@FreeBSD.ORG Sun Jan 11 01:46:15 2004 Return-Path: Delivered-To: freebsd-questions@freebsd.org Received: from mx1.FreeBSD.org (mx1.freebsd.org [216.136.204.125]) by hub.freebsd.org (Postfix) with ESMTP id 1FE5316A4CE for ; Sun, 11 Jan 2004 01:46:15 -0800 (PST) Received: from neostrada.pl (uc171.neoplus.adsl.tpnet.pl [80.54.83.171]) by mx1.FreeBSD.org (Postfix) with ESMTP id CAFC243D45 for ; Sun, 11 Jan 2004 01:46:13 -0800 (PST) (envelope-from zaphod@neostrada.pl) Received: by neostrada.pl (Postfix, from userid 1001) id AFF3540C4; Sun, 11 Jan 2004 10:42:43 +0100 (CET) Date: Sun, 11 Jan 2004 10:42:43 +0100 From: Bernard El-Hagin To: freebsd-questions@freebsd.org Message-ID: <20040111094243.GA1114@hoth> References: <20040110221036.GA44130@tao.thought.org> <20040110223308.GA4881@happy-idiot-talk.infracaninophile.co.uk> <20040110223907.GA16659@Uruk-Hai.Sanitarium.mine.nu> <20040110230218.GA5347@happy-idiot-talk.infracaninophile.co.uk> <6.0.0.22.0.20040110182450.0a09ce58@pop.face2interface.com> <20040110233645.GA5668@happy-idiot-talk.infracaninophile.co.uk> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline In-Reply-To: <20040110233645.GA5668@happy-idiot-talk.infracaninophile.co.uk> User-Agent: Mutt/1.4.1i Subject: Re: perl script question. X-BeenThere: freebsd-questions@freebsd.org X-Mailman-Version: 2.1.1 Precedence: list List-Id: User questions List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Sun, 11 Jan 2004 09:46:15 -0000 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/_/ /' > > 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