Perl используя Net :: SFTP :: Foreign избавиться от приветственного сообщения сервера

Question

когда я подключаюсь к proFTP-серверу, я получаю приветственное сообщение, напечатанное на стандартный вывод.

my $sftp = Net::SFTP::Foreign->new($sftserver);

Все отлично работает, но как мне избавиться от этого сообщения?

Я не хочу передавать весь вывод скрипта в / dev / null, и у меня нет доступа к конфигурации сервера.

Спасибо.

Answer 1

Используйте параметр stderr_fh, как задокументировано:

stderr_fh => $ fh

перенаправляет вывод, отправленный в stderr подпроцессом SSH, на указанный дескриптор файла.

Может использоваться для подавления баннеров:

open my $ssherr, '>', '/dev/null' or die "unable to open /dev/null";
my $sftp = Net::SFTP::Foreign->new($host,
                               stderr_fh => $ssherr);