Tim Allwine said... >John Porter said... > > > >Too bad Tom's word so quickly becomes gospel. > >Why? His words have only brought good things into my life. Is this what you're trying to say? my $word = shift; my @life = (); $from = find_origin($word); if ($from eq 'tchrist') { $status{$word} = 'good'; push (@life, $word); } .....hmmm, but maybe that's simultaneously more and less than you meant. -Keith Allen ----------------------------------------- Keith Allen, PhD Bioinformatics Specialist Deltagen, Inc 1003 Hamilton Ct.. Menlo Park, CA 650 752-0206 ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe