Re: [FWP] duh: A small puzzler

[Sune Kirkeby <sune@interspace.dk>]

On Fri, Jul 30, 1999 at 04:56:14PM -0700, Vicki Brown wrote:
> People asked for simpler puzzles; here's a small one. Perl gurus 
> can't play (or play quietly while the more lurkers consider :-)
> 
> I did this today; I wasn't thinking... (well, it's Friday after all)
> 
>    # records look like
>    # >12|c2169.2750 CHROMAT_FILE: 12=c2169.2750 PHD_FILE: ...
>    #
>    # I want to get just the c2169.2750 part
> 
>    ($id) = split(/\s+/, $record);
> 
>    $id =~ s/^.*|//;    # remove extraneous stuff before the construct info
> 
> 

s{s/^.*|//}
 {s/^.*\|//}

-- 
Sune Kirkeby | "Imagine, if you will, that there were no such
             |  thing as a hypothetical situation..."

==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe