作者akillerbear (我是歹人雄大)
看板perl
標題[問題] 用這程式抓下來的檔無法解壓縮?
時間Wed Nov 1 23:11:52 2006
下面是小弟寫的自動到NCBI抓取檔案的程式
///////////////////////////
#c:\perl\bin\perl -w
use Net::FTP;
open (FILE, ">file.log");
$ftp = Net::FTP->new("ftp.ncbi.nlm.nih.gov",Debug => 1) or die "Can't
connect: $
@\n";
$ftp->login("anonymous", "kkk@yahoo.com");
#@lines = $ftp->ls("gbvrl6.seq.gz");
#foreach $file(@lines){
$ftp->cwd("/genbank");
$ftp->get("gbvrl6.seq.gz") or die "can't get file\n";
#print FILE "$file\n";
$ftp->quit();
///////////////////////////
雖然能正確連上NCBI去抓取gbvrl6.seq.gz這個檔
可是抓下來的檔卻不能解壓縮
會出現錯誤訊息 但是如果用手動去抓取就可以正確解壓縮
請問是哪邊發生問題?THX
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 163.25.118.131
推 LiloHuang:binary mode transfer? 11/01 23:17
推 akillerbear:請問L大可以說請楚點嗎 ~~~甘溫喔 11/02 10:41
推 akillerbear: 呼呼~~~多謝~~~我剛剛試成功了^^ 11/02 14:49
推 LiloHuang::) 11/02 15:07