2012-02-16 3 views
0

perl Net :: FTP Module을 사용하여 로컬에서 FTP로 파일을 업로드 중입니다. 파일을 업로드 한 후 파일을 성공적으로 업로드했는지 여부를 스칼라 변수로 가져 오는 방법은 무엇입니까? 아래에 언급 된 코드를 사용하고 있습니다.perl에서 파일 업로드 상태 Net :: FTP module

use strict; 
use Net::FTP; 


my $ftp_connection=Net::Ftp->new('debian1.com'); 
$ftp_connection->login("myuser","password"); 
$ftp_connection->put('D:/to_upload/tested.xml','/root/received/tested.xml'); 
$ftp_connection->quit; 

위 작업을 수행하는 데 도움이되는 제안 사항을 제공해주십시오. 파일을 바이너리 모드로 전송할 수 있습니까?

참고 : Windows OS에서 개발 중입니다.

감사합니다 ...

답변

3

$ftp_connection->put('D:/to_upload/tested.xml','/root/received/tested.xml'); 코드를 반환 성공에 /root/received/tested.xml입니다 이름은 다른 사람이 확정적 이진 모드로 돌아갑니다 파일 귀하의 요구 사항

use strict; 
use Net::FTP; 


my $ftp_connection=Net::Ftp->new('debian1.com'); 
$ftp_connection->login("myuser","password"); 
$ftp_connection->binary(); 

if($ftp_connection->put('D:/to_upload/tested.xml','/root/received/tested.xml')) { 
    print "successful transfer" 
} else { 
    print "unsuccessful transfer" 
} 
$ftp_connection->quit; 
3
  1. $ftp_connection->message 확인하시기 바랍니다.

  2. 이진 모드로 전송할 파일을 업로드하기 전에이 문구를 작성하십시오. put 방법은 코드와 함께 당신을 도울 것입니다 아래 $ftp_connection->binary(); 희망을 추가하기 전에

    바이너리 $ ftp_connection->를

+0

... 감사합니다 ... :-) – Madhan