Net :: SSH2を使用してリモートマシンにディレクトリが存在するかどうかを確認する方法

Question

ここにはどのようにありますか...指定されたパスにディレクトリが存在するかどうかを確認する必要があります。例えば パスが/ root/home/ の場合、このパスにディレクトリABCが存在するかどうかを確認します。 このようなディレクトリが存在しない場合は作成し、作成しない場合は作成します。

私はNet::SSH2を使用しています。 Net::SSH2を使用してファイルを作成して保存することはできますが、リモートサーバーにNet::SSH2を使用してディレクトリとファイルの存在を確認する方法はわかりません。

Net::SSH2

Answer 1

私はあなたがNet::SSH2::SFTPオブジェクトを作成するsftpメソッドを使用していると仮定？

ディレクトリが存在するかどうかにかかわらず、Net::SSH2::SFTP->mkdirメソッドを呼び出すことです：既に存在するディレクトリを作成しようとする際のオーバーヘッドは重要ではありません。

しかし、あなたは指定されたディレクトリがすでに適所にあるかどうかを見つけるには、ディレクトリが存在する場合にのみ有効Net::SSH2::Dirオブジェクトを返しますNet::SSH2::SFTP->opendir方法を、使用することができなければならない場合。

Answer 2

#!/usr/bin/perl 

use strict; 
use warnings; 
use Net::SSH2; 
use Net::SSH2::SFTP; 
use Net::SSH2::File; 

my $host  = 'sftp.somesite.com'; 
my $path  = "/root/home/ABC"; 
my $user  = "user"; 
my $password = "passwd"; 

my $ssh = Net::SSH2->new(); 

die "Can't Connect to $host" unless $ssh->connect($host); 

if ($ssh->auth_password($user, $password)) 
{ 
    my $sftp = $ssh->sftp(); 
    $sftp->opendir($path) or $sftp->mkdir($path); 
    my $error = $sftp->error; 
    print "Error: $error\n" if (!$sftp->opendir($path)); 
}