Mailing-List:	contact cygwin-help AT sourceware DOT cygnus DOT com; run by ezmlm
List-Subscribe:	<mailto:cygwin-subscribe AT sources DOT redhat DOT com>
List-Archive:	<http://sources.redhat.com/ml/cygwin/>
List-Post:	<mailto:cygwin AT sources DOT redhat DOT com>
List-Help:	<mailto:cygwin-help AT sources DOT redhat DOT com>, <http://sources.redhat.com/ml/#faqs>
Sender:	cygwin-owner AT sources DOT redhat DOT com
Delivered-To:	mailing list cygwin AT sources DOT redhat DOT com
Message-ID:	<3B860623.10806@isl.vtu.lt>
Date:	Fri, 24 Aug 2001 09:45:39 +0200
From:	SaGu <sagu AT isl DOT vtu DOT lt>
User-Agent:	Mozilla/5.0 (Windows; U; Windows NT 5.0; en-US; rv:0.9.3+) Gecko/20010815
X-Accept-Language:	lt, en-us
MIME-Version:	1.0
To:	cygwin AT cygwin DOT com
Subject:	Still Perl problems
X-AntiVirus:	scanned for viruses by AMaViS 0.2.1 (http://amavis.org/)

Hello,
  I'm using the latest cygwin 1.3.2 on Windows2000Pro SP2:

$ uname -a
CYGWIN_NT-5.0 C8T 1.3.2(0.39/3/2) 2001-05-20 23:28 i686 unknown
$ perl -v

This is perl, v5.6.1 built for cygwin-multi

Copyright 1987-2001, Larry Wall

Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using `man perl' or `perldoc perl'.  If you have access to the
Internet, point your browser at http://www.perl.com/, the Perl Home Page.


There is a simple perl script:

use Net::FTP;
$ftp = Net::FTP->new("ftp.netscape.com",Debug => 9);
$ftp->login("ftp",'ftp AT ftp');
$ftp->cwd("/");
$ftp->quit;


If I try to execute the script in bash prompt I get :

$ perl ftptest.pl
Can't call method "login" on an undefined value at ftptest.pl line 3.

But if from bash prompt I run "rxvt" and try to run from there everything works just fine:

$ perl ftppushtest.pl

Net::FTP: Net::FTP(2.58)
Net::FTP:   Exporter(5.562)
Net::FTP:   Net::Cmd(2.19)
Net::FTP:   IO::Socket::INET(1.25)
Net::FTP:     IO::Socket(1.26)
Net::FTP:       IO::Handle(1.21)

Net::FTP=GLOB(0xa18d190)<<< 220 ftp24c.newaol.com FTP server (SunOS 5.7) ready.
Net::FTP=GLOB(0xa18d190)>>> user ftp
Net::FTP=GLOB(0xa18d190)<<< 331 Guest login ok, send your complete e-mail address as password.
Net::FTP=GLOB(0xa18d190)>>> PASS ....
Net::FTP=GLOB(0xa18d190)<<< 230-The response `ftp AT ftp' is not valid.
Net::FTP=GLOB(0xa18d190)<<< 230-Next time please use your e-mail address as password.
Net::FTP=GLOB(0xa18d190)<<< 230 Guest login ok, access restrictions apply.
Net::FTP=GLOB(0xa18d190)>>> CWD /
Net::FTP=GLOB(0xa18d190)<<< 250 CWD command successful.
Net::FTP=GLOB(0xa18d190)>>> QUIT
Net::FTP=GLOB(0xa18d190)<<< 221 Goodbye.

What is wrong ? Can anybody help me solve this problem?



Regards,

Saulius Gurklys






--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Bug reporting:         http://cygwin.com/bugs.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/

- Raw text -