Определите статус загрузки

Question

Я загружаю папку с локального на FTP, используя perl Net :: 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;

В приведенном выше коде я не могу найти статус загрузки.Может кто-нибудь предложить мне получить статус загрузки папки, независимо от того, была ли папка загружена или нет.

Спасибо ...

Answer 1

Подкласс Net::FTP::Recursive для переопределения _rput.Добавьте обработчик обратного вызова в конец блока foreach и передайте текущий файл $file и список файлов @files в качестве аргументов.

В основной части кода подсчитайте каждыйвремя вызова обратного вызова и вычисление прогресса из счетчика и количества элементов в @files.

Answer 2

Во-первых, вы помните, какое имя вашей папки вы передаете через ftf. Если передача выполняется так быстро, и вы не можете отслеживать, находится ли она уже на сервере, вы можете использовать другой метод, чтобы убедиться, что она успешно загружена. 1. Войдите в CPanel вашего сайта через вашего хостинг-провайдера. 2. Найдите устаревшую папку файлового менеджера и нажмите 3. Выберите корневой каталог для документа, нажмите «Перейти», а затем начните видеть, как найти имя папки, которую вы передаете по ftp.