add extract_fasta.pl