How to check if remote directory exists using Net::SSH::Perl

Question

Check to see if remote directory exists using Perl Net::SSH::Perl

I want to check if a directory exists on a report server using the Net::SSH::Perl module.

This command works:

my($stdout, $stderr, $exit) = $ssh->cmd("ls -al /home/mydir");

But how can I do like:

if ( ! -e "/home/mydir/mydir_1" ) {
   mkdir "/home/mydir/mydir_1";
}

Any way to do this using this Perl module?

If you have perl on the remote end as well, just use $ssh->cmd(qq{perl -wle 'exit -e shift' '$filename'}) and then look at the exit code — Corion
– Corion, Commented Jan 15, 2019 at 15:46

Perl Ancar · Accepted Answer · 2019-01-15 08:10:00Z

4

The -p option for mkdir accomplishes what you want (no error if existing), so something like:

my($stdout, $stderr, $exit) = $ssh->cmd("mkdir -p /home/mydir/mydir_1");

answered Jan 15, 2019 at 8:10

Perl Ancar

6201 gold badge4 silver badges10 bronze badges

Sign up to request clarification or add additional context in comments.

1 Answer 1