foreach my ($blastresult, $value) {$_ = $$self{_$_};}