Date: Thu, 28 Aug 2003 20:36:21 -0400 From: mpd <mpd@rochester.rr.com> To: Roger Williams <root@edo.naviservers.net> Cc: questions@freebsd.org Subject: Re: Off Topic RegEx Question Message-ID: <20030829003621.GA45154@rochester.rr.com> In-Reply-To: <20030828082600.P43491-100000@edo.naviservers.net> References: <20030828082600.P43491-100000@edo.naviservers.net>
next in thread | previous in thread | raw e-mail | index | archive | help
On Thu, Aug 28, 2003 at 08:26:43AM +0900, Roger Williams wrote: > I know thins is not the place but I know one of you know this one off the > top of your head. > > I have: > > $list = "dog 1 1 1 cat 2 1 snake 111" > and I want to end up with: > dog 1 cat 2 snake 1 > I thought > $list =~ s/ \d \d/ \d/g; > would do the trick, but that gives me: > dog d 1 1 cat d snake d 1 > > Thanks, > Roger > This quick-n-dirty will do it, but ymmv on other data. There is almost definitely a better way, but this may get you started. echo "dog 1 1 1 cat 2 1 snake 111" | perl -pe 's/^(\D+ \d).* (\D+ \d).* (\D+ \d).*$/$1 $2 $3/g' apologies for the long line. -- ___________________________________________________________ "I PUT MY PANTS ON ONE LEG AT A TIME, JUST LIKE EVERYONE ELSE!" - Pokey the Penguin from "POKEY IS RELAXING (HEIRATE MICH)
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?20030829003621.GA45154>