perl - scp が Perl から利用可能かどうかを確認するにはどうすればよいですか?

Question

Net::SCPでは、どの時点で DSC または RSA キーが必要ですか (つまり、いつ get または put 関数を使用するのですか?)。ファイルを転送せずに scp サービスを利用できることを知りたいです。

Answer 1

リモート システムが ssh/scp ポートでリッスンしているかどうかを確認するだけの場合は、ping を試すことができます。

use Net::Ping;
$p = Net::Ping->new("tcp", 2);
$p->port_number(scalar(getservbyname("ssh", "tcp")));
if ( $p->ping( $hostname ) ) {
    print "ok!";
}

キーまたはパスワードがあり、実際にファイルを転送せずに接続できることを確認したい場合は、Net::SSH または Net::SSH::Expect または Net::SSH2 または Net::SSH::Perl を使用できます。