use Bio::DB::Fastaを使って、FASTAファイル中から指定したIDの配列をFASTA形式で出力させます。 サンプルではスクリーン出力にしてあります。 #!/usr/bin/perluse Bio::SeqIO; use Bio::DB::Fasta;#スクリーンに出力 $seq_out = Bio::SeqIO->new(-fh => \*S…