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