使用Net :: SFTP :: Foreign的Perl摆脱服务器欢迎消息

Question

当我连接到proFTP服务器时,我收到打印到stdout的欢迎消息.

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

一切正常,但我怎么能摆脱这个消息呢？

我不想将整个脚本输出传递给/ dev/null,我也无法访问服务器的配置.

谢谢.

Answer 1

使用记录的stderr_fh选项:

stderr_fh => $ fh

将SSH子进程发送到stderr的输出重定向到给定的文件句柄.

它可以用来抑制横幅:

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