| Subject: | PATCH: support for named ssh identify files |
Hi,
I have added support for named ssh identity files to Net::SCP. It's
nice
and clean for the *put()* and *get()* methods but horrid and kludgy
for
mkdir() and size(), addressing @Net::SSH::ssh_options directly and
trampling over the real purpose for that variable.
You are very welcome to do whatever you would like with this!
Yours,
fish
MIS Manager
Interface Solutions International Ltd
| Subject: | SCP[1].diff |
62c62
< interface is depriciated.
---
> interface is deprecated.
87a88,89
> $flags .= "i$self->{idfile}"
> if defined($self->{idfile}) && $self->{idfile};
108c110
< interface is depriciated.
---
> interface is deprecated.
152a155
> idfile - location of local id file to use
167a171
> 'idfile' => '',
194a199,209
> =item idfile [PATH]
>
> Compatibility method. Optionally sets the location of the id file.
>
> =cut
>
> sub idfile {
> my($self, $path) = @_;
> $self->{'idfile'} = $path if $path;
> }
>
229a245,246
> push( @Net::SSH::ssh_options, ( '-i', $self->{idfile} ) )
> if defined($self->{idfile}) && $self->{idfile};
260a278,279
> push( @Net::SSH::ssh_options, ( '-i', $self->{idfile} ) )
> if defined($self->{idfile}) && $self->{idfile};