🚀 go-pugleaf

In article <1992Oct28.204157.14215@prl.dec.com> boyd@prl.dec.com (Boyd Roberts) writes:
>In article <guy.720279933@tdsb-s>, guy@mais.hydro.qc.ca (Guy Harel) writes:
>> 
>> >carpenter@vixvax.mgi.com wrote:
>> >> I have a directory containing filenames of the form "*.[0-9]*",
>> >> and would like to write a csh script to print out the "root" of
>> >> each name.  For example, if the names abc.def.012 and gh.ijkl.mno.987
>> >> appear in the directory, I would like to see abc.def and gh.ijkl.mno
>> >> printed out.
>> 
>> I had fun trying the following:
>
>I'm sure you did.
>
>> 
>> echo abc.def.ghi.123 |  \
>> awk -F. '{ $x=$1 ; for ( i = 2 ; i < NF ; i++ ) $x=$x"."$i } END { print $x }'
>
>Could you make it a little more complex?
>
>    prl313 ; echo abc.def.ghi.123 | sed 's/\(.*\)\..*/\1/'
>    abc.def.ghi
>
>Nah, too simple.
>

How about

       expr abc.def.ghi.123 : '\(.*\)\..*'

Nah, that's trivial.  Sorry.


But
       expr abc.def.ghi.123 : '\(.*\)\.[0-9].*'

is slightly more complex and matches exactly the poster's expression.

-- 
Michael Lemke
Astronomy, UT Austin, Texas
(michael@io.as.utexas.edu or UTSPAN::UTADNX::IO::MICHAEL [SPAN])