net::sftp connection close

  • Follow


Hi,
I have a strange connection problem with sftp.
It seems that connection is establish but when I try to download any
file it return me an error.

Here the code:

eval {

        $sftp = Net::SFTP->new($connessione{HOST}
                ,user=>$connessione{USER}
                ,password=>$connessione{PASSWORD} );

     };

print "Cannot connect to sftp $connessione{HOST}" if ($@);

my $rm_file1 =
'/home/oriolo_bi/ORIOLO_BI/PWA/2006/03/PWA.2006.03.BI_FA2.0001.ok.gz';
my $rm_file2 =
'/home/oriolo_bi/ORIOLO_BI/PWA/2006/03/PWA.2006.03.BI_FA1.0001.ok.gz';
my $rm_file3 =
'/home/oriolo_bi/ORIOLO_BI/PWA/2006/03/PWA.2006.03.BI_GR.0001.ok.gz';
my $rm_file4 =
'/home/oriolo_bi/ORIOLO_BI/PWA/2006/03/PWA.2006.03.BI_SW.0001.ok.gz';

my $local_file1 = '/store2/kpi/temp/Nicola/BI_FA2.0001.ok.gz';
my $local_file2 = '/store2/kpi/temp/Nicola/BI_FA1.0001.ok.gz';
my $local_file3 = '/store2/kpi/temp/Nicola/BI_GR.0001.ok.gz';
my $local_file4 = '/store2/kpi/temp/Nicola/BI_SW.0001.ok.gz';

                defined( $sftp->get($rm_file1, $local_file1));   #115
                defined( $sftp->get($rm_file2, $local_file2));
                defined( $sftp->get($rm_file3, $local_file3));
                defined( $sftp->get($rm_file4, $local_file4));

.......
......
I get the following error message:

Connection closed at ./scar.pl line 115

Thanks at all

0
Reply milella_ (2) 5/4/2006 10:27:08 AM


0 Replies
24 Views

(page loaded in 0.026 seconds)

12/9/2012 3:47:06 AM


Reply: