[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

[FWP] duh: A small puzzler



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


what's wrong? :-}
-- --
        |\      _,,,---,,_       Vicki Brown <vlb@cfcl.com>
  ZZZzz /,`.-'`'    -.  ;-;;,_   Journeyman Sourceror: Scripts & Philtres
       |,4-  ) )-,_. ,\ (  `'-'  P.O. Box 1269  San Bruno  CA  94066
      '---''(_/--'  `-'\_) http://www.cfcl.com/~vlb  http://www.macperl.com

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