Cody Pendant has asked for the wisdom of the Perl Monks concerning the following question:
In fact it uploads twice, once to an internal server (where it's checked) and then to an external server, if the user presses a "continue, everything's fine" button.
The internal server is LINUX and Net::FTP, in normal FTP mode, uploads in a second. The external server is a supposedly-very-robust "data appliance" which uses NT to manage FTP.
I can't even FTP to this external server in normal FTP mode, I have to use Passive Mode:
$ftp = Net::FTP->new("external.host.name", Passive => 1);
And this is all very well, but the actual file transfer (10Kb at worst) seems to take ages. The logon is instant, the CWD is instant, the rename of the old file with ".bak" is instant, but then the actual upload appears to take something like three or four minutes.
A desktop FTP client upload is also more or less instant for the same file.
Can any monks shed light on this for me please? To be frank, I don't really know what Passive FTP means, or why I can't use regular FTP for this server.
Is the transfer really taking three minutes, or is it somehow being queued by the server and accepted after three minutes, or is it happening instantly and the server taking three minutes to report success?
Not that I care which answer is correct if you can help me speed it up.
($_='kkvvttuubbooppuuiiffssqqffssmmiibbddllffss')
=~y~b-v~a-z~s; print
|
|---|