Here is the output
Net::FTP: Net::FTP(2.65)
Net::FTP: Exporter(5.562)
Net::FTP: Net::Cmd(2.21)
Net::FTP: IO::Socket::INET(1.25)
Net::FTP: IO::Socket(1.26)
Net::FTP: IO::Handle(1.21)
Net::FTP=GLOB(0x1ab2694)<<< 220 (vsFTPd 1.2.0)
Net::FTP=GLOB(0x1ab2694)>>> user test
Net::FTP=GLOB(0x1ab2694)<<< 331 Please specify the password.
Net::FTP=GLOB(0x1ab2694)>>> PASS ....
Net::FTP=GLOB(0x1ab2694)<<< 230 Login successful.
yesANet::FTP=GLOB(0x1ab2694)>>> PORT IP,13,213
Net::FTP=GLOB(0x1ab2694)<<< 200 PORT command successful. Consider using
PASV.
Net::FTP=GLOB(0x1ab2694)>>> STOR test.jpg
Net::FTP=GLOB(0x1ab2694)<<< 150 Ok to send data.
Net::FTP=GLOB(0x1ab2694)<<< 226 File receive OK.
Net::FTP=GLOB(0x1ab2694)>>> QUIT
Net::FTP=GLOB(0x1ab2694)<<< 221 Goodbye.
----- Original Message -----
From: "Oliver Schnarchendorf" <[EMAIL PROTECTED]>
To: "John" <[EMAIL PROTECTED]>
Cc: "Perl Beginners" <[EMAIL PROTECTED]>
Sent: Wednesday, February 25, 2004 7:06 PM
Subject: Re: tranfering in binmode
> On Wed, 25 Feb 2004 18:52:28 +0200, John wrote:
> > I want to transfer a document from a win32 to unix system via
> > Net::FTP but the operation fails (file is not sent properly)
> >
> > i have set up the VsFTPD on a linux system.
> >
> > Do you know what caused the failure?
> No idea whatsoever... yet I could guess. But I won't.
>
> Give the following a try:
>
> $ftp = Net::FTP->new("some.host.name", Debug => 1);
>
> This should give a decent way to find out where things go avry.
>
> /oliver/
>
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
