为什么 Perl 的 Net::SFTP->new 抱怨“不是 ARRAY 引用”？

Question

我正在尝试使用 Net::SFTP 连接到远程服务器。

我的脚本是：

my %args = ( 
    ssh_args => { 
       user => 'canneu_scp', 
       identity_files => [ '/home/home1/cgrshah/responsys/capgemini.private' ], 
       debug => 1, 
 } );

my $targetserver='files.responsys.net';

my $sftp = Net::SFTP->new($targetserver, %args) 
      or die "could not open connection to $targetserver\n";

但是当我运行此脚本时，我收到一条错误消息：

 Not an ARRAY reference at /usr/lib/perl5/site_perl/5.8.1/Net/SFTP.pm line 36.

任何人都可以帮助我吗？

Answer 1

这只是一个盲目的猜测，但是 user 选项不应该位于传递给 ssh_args 的哈希中，它处于同一级别。尝试使用此代码：

my $sftp = Net::SFTP->new(
    $targetserver,
    user     => 'canneu_scp', 
    ssh_args => { 
        identity_files => [ '/home/home1/cgrshah/responsys/capgemini.private' ], 
        debug => 1,
    } 
) or die "could not open connection to $targetserver\n";

听起来上面的代码让您更进一步，但现在您遇到了问题，因为您的 Math::BigInt 太旧了。我看到了三种前进的方法：

1. 切换到 RSA 密钥而不是 DSA 密钥
2. 找到 Math::BigInt 版本 1.78 或更高版本的 RPM
3. 手动安装 Math::BigInt< 的副本/code>

第三个选项有很多陷阱，如果您决定使用它，我建议执行以下步骤：

1. 安装 App::cpanminus
   1. 确保您安装了 gcc
   2. 运行wget -O- http://cpanmin.us | perl - --local-lib=~/perl5 App::cpanminus
   3. 将 ~/perl5/bin 添加到您的路径
2. 将 Math::BigInt 安装到您的家中使用 cpanm --local-lib=~/perl5 Math::BigInt 的目录
3. 将 use lib "$ENV{HOME}/perl5"; 添加到脚本的开头，以便它可以找到新模块