in reply to Re^2: FTP & MD5
in thread FTP & MD5
I tried your module for transfer, and it gives me a couple of errors... Would you be able to look at those?
Here's the code:
my $tlsftp=Net::Lite::FTP->new(); $tlsftp->open($ftphost, 2030); $tlsftp->user("$ftpuser"); $tlsftp->pass("$ftppass"); $tlsftp->cwd("$dir"); my @files=$tlsftp->nlst("$fname"); print "@files\n";
Here's the output:
OPEN.Received: 220 ftpssl.dstoutput.ca X2 WS_FTP Server 5.0.4 (3934600 +204) SRV Response: 220 ftpssl.dstoutput.ca X2 WS_FTP Server 5.0.4 (39346002 +04) RECV: 220 ftpssl.dstoutput.ca X2 WS_FTP Server 5.0.4 (3934600204) OPEN..Received: 220 ftpssl.dstoutput.ca X2 WS_FTP Server 5.0.4 (393460 +0204) Received: 234 SSL enabled and waiting for negotiation Prototype mismatch: sub Net::SSLeay::randomize (;$$) vs none at (eval +5) line 1. Sending: PBSZ 0 Prototype mismatch: sub Net::SSLeay::ssl_read_until ($;$$) vs none at +(eval 6) l ine 1. Damn! undefined response Sending: PROT P Damn! undefined response
I suspect my SSLeay, but lack knowledge to successfully troubleshoot/fix the problem...
More info on this: The script is compiled on WindowsXP, then I run perl2exe on it, then run the .EXE on Windows NT box. perl2exe is supposed to include all the necessary libraries tho...
--------------------------------
An idea is not responsible for the people who believe in it...
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^4: FTP & MD5
by Eyck (Priest) on Jun 23, 2005 at 07:11 UTC |
In Section
Seekers of Perl Wisdom