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