Date: Sat, 8 Apr 2006 19:16:03 -0400 From: "Ashok Shrestha" <ashok.shrestha@gmail.com> To: freebsd-perl@freebsd.org Subject: Net::FTPSSL error Message-ID: <79e2026f0604081616h2dab7552m38b7d53744c474db@mail.gmail.com>
next in thread | raw e-mail | index | archive | help
Hi all,
System Info:
FreeBSD 6.0-RELEASE
bsdpan-Net-FTPSSL-0.04
p5-Net-SSLeay-1.30_1
perl-5.8.7
I'm trying to use Net::FTPSSL to connect to an FTP server via SSL.
Here is the script:
#!/usr/bin/perl -w
use Net::FTPSSL;
my $ftps =3D Net::FTPSSL->new('127.0.0.1',
'Encryption' =3D> 'E',
'Debug' =3D> 1,
'Timeout' =3D> 20)
or die "Can't open 127.0.0.1";
$ftps->login('username123', 'password123') or die "Can't login: ",
$ftps->$last_message();
$ftps->cwd("/working") or die "Can't change directory: ", $ftps->last_mes=
sage;
$ftps->get("C13.txt") or die "Can't get file: ", $ftps->last_message;
$ftps->quit();
Here is my error:
./test_FTPSSL.pl
Name "main::last_message" used only once: possible typo at
./test_FTPSSL.pl line 11.
>>> USER username123
<<< 331 Please specify the password.
>>> PASS password123
Use of uninitialized value in length at (eval 7) line 1.
Use of uninitialized value in string eq at blib/lib/Net/SSLeay.pm
(autosplit into blib/lib/auto/Net/S
SLeay/ssl_read_all.al) line 1615.
Can't read on socket: at ./test_FTPSSL.pl line 11
Are there any relevant conf files I should post? Any ideas how to
resolve this issue?
-- Ashok Shrestha
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?79e2026f0604081616h2dab7552m38b7d53744c474db>