2012-02-28 15 views
2

perl Net :: FTP :: Recursiveモジュールを使用して、ローカルからFTPにフォルダをアップロードしています。私は以下のサンプルコードを書いています。そのコードでは、アップロードされたかどうかといったアップロードプロセスのステータスを知る必要があります。アップロード状況を確認

use strict; 
use Net::FTP:recursive; 

my $ftp_con= Net::FTP::Recursive->new('host.com',Debug=>0); 
$ftp_con->login('username','password'); 
$ftp_con->rput('d:\my_test','\root\my_test'); 
$ftp_con->quit; 

アップロードのステータスがわかりません。誰でも私は、フォルダがアップロードされているかどうか、フォルダのアップロード状況を取得することを提案することができます。

ありがとう...

答えて

5

サブクラスNet::FTP::Recursiveは、_rputを上書きします。 foreachブロックの最後にコールバックフックを追加し、現在のファイル$fileとファイルのリスト@filesを引数として渡します。

コードの主要部分では、コールバックが呼び出されるたびにカウントアップし、カウンタからの進捗状況と要素数を@filesに計算します。

+0

申し訳ありませんダキシム..私ははっきりと理解できません。可能であれば、手順を明確に説明してください。 – Madhan

0

まず、ftf経由で転送するフォルダ名は何ですか?転送が非常に高速で、すでにサーバーにあることを監視できない場合は、anothetメソッドを使用して正常にロードされたことを確認できます。 1.ホスティングプロバイダ経由でウェブサイトのCPanelにログインします。 2.従来のファイルマネージャフォルダを見つけ、 をクリックします。3.ドキュメントルートを選択し、Goをクリックして、ftp経由で転送するフォルダ名を見つけます。

関連する問題