遞歸FTP同步:: FTP是痛苦的緩慢

Question

我寫的東西很簡單通過FTP同步在Perl我的文件

sub ftp_update { 
    print "Checkin\' $_[0] \n"; 
    $ftp->cwd($_[0]); 
    chdir $_[0]; 
    my @ls = $ftp->ls; 

    foreach (@ls) {   
     ftp_update($_) if $ftp->isdir($_); 

     next unless (! -e $_); 

     if ($ftp->isfile($_)) { 
      print "Gettin\' $_\n"; 
      $ftp->get($_); 
     }    
    } 
    $ftp->cdup; 
    chdir ".."; 
} 

它的工作原理沒事，但比起它的FileZilla是痛苦的緩慢。即使一切都是最新的，即沒有發生實際的文件傳輸，它仍然比FileZilla慢得多。

有什麼建議嗎？

Answer 1

從LWP::Simple的mirror()功能是否適用於"ftp:"架構？這個例子顯示"http:"和"gopher:"，所以也許它也適用於FTP。

但我很好奇 - 如果你已經有另一個程序能夠滿足你的需求，那麼你在找什麼？