Привет,

Мы сталкиваемся с странные проблемы в нашем проекте. мы должны направить некоторые XML И звуковых файлов на удаленном FTP-сервер с Linux поле, мы делаем это в Perl скрипт с использованием Сети:: FTP->. Речь идет .. FTPed когда файлы Perl скрипты, только пустой файл (0 байт) получают из удаленного сервера и данные, не получает записываются на сервер. Но мы можем вручную передачи файлов на FTP-сервер с помощью FTP инструментом, но они не когда мы пытаемся делать то же самое через Perl Скрипт. Мы проверили на удаленном сервере, и есть много свободного пространства на сервере.

Наш скрипт возвращается 'Плохой дескриптор файла' ошибка, где, как она работает штраф за все остальное из других 50 FTP-серверов мы.

Любая помощь / вход касается этого вопроса было бы весьма признателен.

Спасибо

Здравствуйте, вы сделали хороший fisrt шаги по устранению этой проблемы. Кажется, что только Perl Сценарий не может должным образом взаимодействовать с FTP-сервера и операционной системы, удаленной один. Пожалуйста, дайте нам знать о версии ОС, FTPD и после некоторых Perl код, если это возможно. Похож на совместимость вопрос, так как скрипт работает по отношению к другим операционным системам, и некоторых других FTP-серверов. Важно, чтобы ответить на следующие вопросы, а - Я изменил сценарий, какую ОС и FTP-серверы мой скрипт работает, и какая разница на удаленном конце, в этой конкретной задачи. Можете ли вы выполнить те же задачи в отношении других машин? Существуют ли какие-либо специальные символы или Windows-подобных путей в скрипте? Я видел "плохой файл описатель" либо поврежден исходный файл теста, или против Windows FTP - Мне не хватает в Windows правильный путь представления. HTH.

Привет, Thaks за быстрый ответ.

Наши окна ОС Linux ---> Red Hat Enterprise Linux 2.4.21-47.0.1 (выпуск 3)
Удаленный сервер FTP OS ---> Ubuntu 6.06.1

Ниже Perl Код, который мы используем для подключения к удаленным FTP-сервером и передавать файлы.

EVAL ($ FTP \u003d Нетто:: FTP-> New ($ remoteServerIP, Debug \u003d> 0) или $ exitModule \u003d 'TRUE');
если ($ @ или $ exitModule EQ 'TRUE') (

log_error ( "ОШИБКА: Не удается подключиться к");
EVAL ($ FTP-> CLOSE ())

() другое
EVAL ($ FTP -> Вход ($ пользователя Пароль $), или $ exitModule \u003d 'TRUE');
если ($ @ или $ exitModule EQ 'TRUE') (
log_error ( "ERROR: (". $ FTP-> сообщение. ") Не удалось войти");
EVAL ($ FTP-> CLOSE ())
() другое
EVAL ($ FTP-> поставить ($ sourceFile, $ targetFile) или $ статуса \u003d 'ERROR');
моя ftp_message $ \u003d $ FTP-> сообщения;
если ($ @ или $ статус эе 'ERROR') (
log_error ( "Предупреждение: (". ftp_message $ ".) Ошибка во время передачи");
)
)
);


Мы получаем сообщение об ошибке "ВНИМАНИЕ: Ошибка при передаче файла. Ошибка во время передачи " (при попытке нажать файлы выше Perl код), поскольку за два месяца до этого, мы смогли передать файлы. Мы не сделали каких-либо изменений на нашем сервере и отдаленных severt за последние 12 месяцев. Мы не смогли выяснить, что неожиданно в результате чего вопрос.

Спасибо.