批量从NCBI后台下载指定数据的Perl脚本

        最近需要在NCBI中下载所有Xanthomonas属菌株对应的gbk文件，由于NCBI前台gbk数据已经改版，故打算从后台ftp.ncbi.nlm.nih.gov下载。写了个Perl脚本用于批量下载NCBI后台数据，有这方面需求的同仁们可以参考。另外，多进程暂时未成功，后期再更改。

#!/usr/bin/perl
##################################################################################################
# NCBI_ftp_batch_fetch.pl
# 黄良博 huanglb0805@163.com
# 2015-3-25
# 用途：可用于在NCBI的后台ftp.ncbi.nlm.nih.gov/genomes/Bacteria中下载某一个属对应的文件（gbk,fna,gbs,ptt等均可）。
# 下载Xanthomonas属中所有菌株的gbk文件和fna文件：
# perl $0 -g Xanthomonas -s gbk -s fna
# 注意：多进程暂时不能使用
##################################################################################################

use v5.16;
use warnings;
use Net::FTP;
use Cwd;
use Getopt::Long;
use Parallel::ForkManager;

my($genus,@suffix,$thread,$help);

GetOptions(
	"genus:s"	=>\$genus,
	"suffix:s"	=>\@suffix,
	#"thread:i"	=>\$thread