At 06:49 -0700 6/13/99, Randal L. Schwartz wrote: > print join ", ", map sprintf("SEQ ID NO: %s (%s)", $pairs{$id}, $id), >@ids; > > map is your friend too. At 18:40 -0700 6/13/99, Todd Larason wrote: > print join ", ", map sprintf("SEQ ID NO: %s (%s)", $pairs{$_}, $_), @ids; > > surely? I knew this would be a useful list ;-) -- -- |\ _,,,---,,_ 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.org ==== Want to unsubscribe from this list? (Don't you love us anymore?) ==== Well, if you insist... Send mail with body "unsubscribe" to ==== fwp-request@technofile.org