win 10 上以 perl 抓取最新版 edirect

perl -MNet::FTP -e "$ftp = new Net::FTP('ftp.ncbi.nlm.nih.gov', Passive => 1); $ftp->login;$ftp->binary; $ftp->get('/entrez/entrezdirect/edirect.zip');"

沒想到 perl 還是這麼好用…