ssh-sftp-perl-users

[Tech S. <su...@vo...>]

All;

    I am using the Net::SFTP v0.012 and Net::SSH::Perl v2.14 modules on a
CentOS 6 server. I wrote a small test script to login to a remote server,
put a small test file, and log out. Simple enough. My problem is that when
the script logins in to the remote server, I am getting the following
warning:

 

"Use of uninitialized value $_[0] in pack at
/opt/perl/site/lib/Net/SSH/Perl/Buffer.pm line 107".

 

Since I have to distribute my final script to several users, I really need
to figure out what I am missing. Any insight at all would be greatly
appreciated. Here is my test script.

 

#!/usr/bin/env perl

    use Net::SFTP;

 

    my %args = ( );

    $args{ user } = 'testuser';

    $args{ password } = 'QX9mvDLMXDTKqQqN';

    $args{ debug } = '1';

    $args{ warn } = '0';

    my $host = 'backup_server';

    my $file = 'notes.txt';

    my $path = '/home/backups/testuser';

 

    my $sftp   = Net::SFTP->new( $host, %args );

    my $handle = $sftp->do_open( $path );

    $sftp->put( $file, $file );

    $sftp->do_close( $handle );

 

    exit;

 

Thanks;

John V.