Select Code to Download

unless (open (BLAST, "<result.fasta")){
    print "Can not open data file \n";
    exit;
}

open BLAST, "<result.fasta" or die "Can not open data file: $!\n";