> From: Joe Kazimierczyk <[EMAIL PROTECTED]>
> Subject: Re: Net::FTP speed
> To: [EMAIL PROTECTED]
>
> Dan Sugalski wrote:
> >
> > Yech, that's abysmal. Try turning on debugging to see if anything shows
> > there. Also consider switching from the generic store method to one you
> > roll by hand. (There are directions in the Net::FTP docs for this) That way
> > you can see how long each piece of the put takes. You might be tripping
> > over some timer or something.
>
> Debugging on doesn't reveal any problems. I dread having to code my
> own store method, so I'll leave that as my last resort! I guess I'm
> just hoping there's a simple answer that I've missed.
from a v7.2 alpha/TCPIP v5.0a system
to the same, but running a MadGoat FTP 2.6-1 ftp server,
(on a 10mb network) a short test showed NET::FTP xferr'ed 2634
blocks in under 4s. (2634 * 512) / 3.84 => 351,200 bytes/s
I recall getting close to wire speed xfers w/ TCPIP 5.0a
(at both client/server ends) with the right tweaks,
but it's also also noting that mismatched window sizes
(taken together w/ delay_ack) can produce really poor xfer times
(typically from default NT to default VMS multinet)
Multinet has a similar logical (or qualifier).
see: http://ftp.multinet.process.com/multinet-docs/user_guide/Ch6.htm
(search for window_size)
If we hadn't just recently chg'ed to a switched network,
I could probably have looked up what windows size NET::FTP is using
by default.
(perhaps find a sniffer, and/or try:
$mu tcpdump <host> and (port ftp or port ftp-data)
other things I've tries to enhance speed, is using a
freshly init'ed virtual disks (LDAn, or VDan:), at each end
the src file being contiguous, and the dest file set up to
use very large extents ...
$ tcpip ! or UCX
TCPIP> help set prot qualifiers_for_tcp /quota
TCPIP> help set prot qualifiers_for_tcp /delay_ack
use Net::FTP;
$ftp = Net::FTP->new("xyz.acme.com");
$ftp->login("<username>","<password>");
$ftp->cwd("P_LOG:");
$ftp->type("IMAGE");
$ftp->put("JRANDOM.ZIP");
$ftp->quit;
