diff options
Diffstat (limited to 'SCP.pm')
-rw-r--r-- | SCP.pm | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -12,7 +12,7 @@ use IPC::Open3; @ISA = qw(Exporter); @EXPORT_OK = qw( scp iscp ); -$VERSION = '0.06'; +$VERSION = '0.07'; $scp = "scp"; @@ -203,7 +203,7 @@ sub get { $local ||= basename($remote); my $source = $self->{'host'}. ":$remote"; $source = $self->{'user'}. '@'. $source if $self->{'user'}; - scp($source,$local); + $self->scp($source,$local); } =item mkdir DIRECTORY @@ -289,7 +289,7 @@ sub put { my $dest = $self->{'host'}. ":$remote"; $dest = $self->{'user'}. '@'. $dest if $self->{'user'}; warn "scp $local $dest\n"; - scp($local, $dest); + $self->scp($local, $dest); } =item binary |