[Ssh-sftp-perl-users] issues with transfer speeds using NET::SFTP
Brought to you by:
dbrobins
|
From: Isaacson T. <Tra...@HC...> - 2004-06-16 16:25:39
|
I am having transfer speed issues with NET::SFTP, via the following script
(which I copied from a google search):
----------------------------------------------------------------------------
--------------------
#!/usr/bin/perl
use strict;
use Net::SFTP;
# Net::SFTP does no error reporting
my $sftp = undef;
#eval{
$sftp = Net::SFTP->new("host",
user=>"loginID",
password=>"password",
);
#};
if ($@) { print "Sftp connection failed:\n $@\n"; }
if (! $sftp) {
print "I can't connect!\n";
}else{
print "SUCCESS!\n";
}
system('date');
print "getting file . . .\n";
$sftp->get ("sftptestdata", "sftptestdata");
system('date');
----------------------------------------------------------------------------
-------------------
I only get 10-->kb<--/sec with the above script. command line sftp and ftp
provide something around ~3mb/sec. so far I have been unable to locate a
solution via the mighty google. has anyone ran across this issue?
thanks.
Trace
|