in reply to undefined value returned

0 and undef are not the same thing... do an

if (! defined $blast_results)

In Section Seekers of Perl Wisdom