Perl FTPゼロサイズファイル

Question

Perlでは、ファイルをftpしようとしましたが、リモートサーバのファイルはゼロサイズです。

$ftp = new Net::FTP($URL); 
$ftp->put($local_file, $remote_file); 

ローカルファイルは空ではありませんが、なぜftp-edファイルが空であるのでしょうか？

Answer 1

ドキュメントをチェックしましたか？ http://search.cpan.org/dist/libnet/Net/FTP.pm 具体的には、匿名で接続している場合でもログインする必要があり、すべてのコードの戻りコードを確認する必要があります。ここで
はCPANページから概要です：

use Net::FTP; 

$ftp = Net::FTP->new("some.host.name", Debug => 0) 
    or die "Cannot connect to some.host.name: $@"; 

$ftp->login("anonymous",'-anonymous@') 
    or die "Cannot login ", $ftp->message; 

$ftp->cwd("/pub") 
    or die "Cannot change working directory ", $ftp->message; 

$ftp->get("that.file") 
    or die "get failed ", $ftp->message; 

$ftp->quit; 

Answer 2

あなたが経験している何の問題を調べるには、次のように、コードを変更してください：

$ftp = new Net::FTP($URL); 
$ftp->put($local_file, $remote_file) or die $ftp->message; 

ほとんどの場合、この変更はにあなたに十分な情報が得られます問題を解く。