Hi, I believe I found what the problem was. I created a test case for it and am uploading the new version to CPAN. I have attached it.
If you have a second, please let me know if it works.
Thanks
Ramesh R Penugonda <rpenugonda@...> wrote:
Thanks for replying to my mail.
I did the 'print "LISTING: @listing";' and able to get the o/p
'LISTING: /FTP-Policies.html.
The other thing is I am able to download the same file using the
Net::FTP (get) package. I think may be I am passing the parameters
incorrectly
Thanks a Lot for replying
Ramesh
-----Original Message-----
From: Terrence Brannon [mailto:princepawn@...]
Sent: Monday, June 30, 2003 2:59 PM
To: rpenugonda@...; tbone@...
Cc: net-ftp-common@yahoogroups.com
Subject: Re: Net::FTP::Common
Hi Ramesh, I dont have a computer right now, but it
looks like you are trying to download a file which
does not exist. of course, this should not lead to an
error, but I wont be able to fix this until I can get
to a machine, probably not for a week or two.
How about if you did a
print "LISTING: @listing";
right after you got the listing
--- Ramesh R Penugondawrote:
> Hello,
>
> I don't know whether I can Email you or not
> regarding this problem but I
> am any inconvenience caused to you sorry. I am using
> Net::FTP::Common I
> am using version 2.9. I am having a weird problem I
> am able to login a
> an user and browse through the directories get the
> listing etc ..but
> when I try to 'get' a file it errors out saying
> "error at line 243
> Common.pm".I am enclosing both the output (Debug 1)
> and the small code I
> wrote. Any help would be greatly appreciated.
>
> Ramesh
>
> > #!/usr/bin/perl
> use Net::FTP::Common;
> our %netftp_cfg = (Debug => 1 ,Timeout => 120);
> our %Common_cfg = (User =>'xxxx',Pass
> =>'xxx',LocalDir =>'/tmp',Host =>'ftp.nac-mi.com',
> RemoteDir => '/', Type => 'I');
> $ftp =
> Net::FTP::Common->new(\%Common_cfg,%netftp_cfg);
> $ftp->login or die "CANNOT LOGIN";
> @listing = $ftp->ls;
> for $e (@listing)
> {
> print "$e \n";
> }
> $ftp->get(RemoteFile=>"FTP-Policies.html");>
Net::FTP>>> Net::FTP(2.71)
> Net::FTP>>> Exporter(5.562)
> Net::FTP>>> Net::Cmd(2.24)
> Net::FTP>>> IO::Socket::INET(1.25)
> Net::FTP>>> IO::Socket(1.26)
> Net::FTP>>> IO::Handle(1.21)
> Net::FTP=GLOB(0x82e2c90)<<<
> 220-################################################
> ##########################
> Net::FTP=GLOB(0x82e2c90)<<< 220-#
> Net::FTP=GLOB(0x82e2c90)<<< 220-# This FTP site is
> restricted to authorized use
> rs for legitimate
> Net::FTP=GLOB(0x82e2c90)<<< 220-# business purposes
> and is subject to audit. T
> he unauthorized access,
> Net::FTP=GLOB(0x82e2c90)<<< 220-# use, or
> modification of computer systems or t
> he data contained
> Net::FTP=GLOB(0x82e2c90)<<< 220-# therein or in
> transit to/from, may be illegal
> .
> Net::FTP=GLOB(0x82e2c90)<<< 220-#
> Net::FTP=GLOB(0x82e2c90)<<< 220-# NOTE: When
> placing files on this server, rem
> ember to Stuff (.sit),
> Net::FTP=GLOB(0x82e2c90)<<< 220-# BinHex (.hqx,
> .bin), or Zip (.zip) your files
> to prevent corruption.
> Net::FTP=GLOB(0x82e2c90)<<< 220-#
> Net::FTP=GLOB(0x82e2c90)<<< 220-# If you need
> access to this system, you will b
> e required to request
> Net::FTP=GLOB(0x82e2c90)<<< 220-# a login and
> password from us directly. Anony
> mous access to this
> Net::FTP=GLOB(0x82e2c90)<<< 220-# site is no longer
> supported or allowed. If y
> ou require the utilities
> Net::FTP=GLOB(0x82e2c90)<<< 220-# to compress or
> decompress files that have or
> will be placed on this
> Net::FTP=GLOB(0x82e2c90)<<< 220-# server, they may
> be downloaded from the appro
> priate Utilities folder
> Net::FTP=GLOB(0x82e2c90)<<< 220-# (Mac or PC).
> Net::FTP=GLOB(0x82e2c90)<<< 220-#
> Net::FTP=GLOB(0x82e2c90)<<< 220-# NAC makes no
> claims or guarentees the integri
> ty of these files.
> Net::FTP=GLOB(0x82e2c90)<<< 220-# Use them at your
> own risk.
> Net::FTP=GLOB(0x82e2c90)<<<
> 220-################################################
> ##########################
> Net::FTP=GLOB(0x82e2c90)<<< 220-
> Net::FTP=GLOB(0x82e2c90)<<< 220-
> Net::FTP=GLOB(0x82e2c90)<<< 220 ftp.nac-mi.com FTP
> server (Version wu-2.6.2(10)
> Tue Mar 11 11:53:05 EST 2003) ready.
> Net::FTP=GLOB(0x82e2c90)>>> user nacpublic
> Net::FTP=GLOB(0x82e2c90)<<< 331 Password required
> for nacpublic.
> Net::FTP=GLOB(0x82e2c90)>>> PASS ....
> Net::FTP=GLOB(0x82e2c90)<<< 230 User nacpublic
> logged in. Access restrictions a
> pply.
> Net::FTP=GLOB(0x82e2e4c)<<<
> 220-################################################
> ##########################
> Net::FTP=GLOB(0x82e2e4c)<<< 220-#
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# This FTP site is
> restricted to authorized use
> rs for legitimate
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# business purposes
> and is subject to audit. T
> he unauthorized access,
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# use, or
> modification of computer systems or t
> he data contained
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# therein or in
> transit to/from, may be illegal
> .
> Net::FTP=GLOB(0x82e2e4c)<<< 220-#
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# NOTE: When
> placing files on this server, rem
> ember to Stuff (.sit),
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# BinHex (.hqx,
> .bin), or Zip (.zip) your files
> to prevent corruption.
> Net::FTP=GLOB(0x82e2e4c)<<< 220-#
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# If you need
> access to this system, you will b
> e required to request
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# a login and
> password from us directly. Anony
> mous access to this
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# site is no longer
> supported or allowed. If y
> ou require the utilities
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# to compress or
> decompress files that have or
> will be placed on this
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# server, they may
> be downloaded from the appro
> priate Utilities folder
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# (Mac or PC).
> Net::FTP=GLOB(0x82e2e4c)<<< 220-#
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# NAC makes no
> claims or guarentees the integri
> ty of these files.
> Net::FTP=GLOB(0x82e2e4c)<<< 220-# Use them at your
> own risk.
> Net::FTP=GLOB(0x82e2e4c)<<<
> 220-################################################
> ##########################
> Net::FTP=GLOB(0x82e2e4c)<<< 220-
> Net::FTP=GLOB(0x82e2e4c)<<< 220-
> Net::FTP=GLOB(0x82e2e4c)<<< 220 ftp.nac-mi.com FTP
> server (Version wu-2.6.2(10)
> Tue Mar 11 11:53:05 EST 2003) ready.
> Net::FTP=GLOB(0x82e2e4c)>>> user nacpublic
> Net::FTP=GLOB(0x82e2e4c)<<< 331 Password required
> for nacpublic.
> Net::FTP=GLOB(0x82e2e4c)>>> PASS ....
> Net::FTP=GLOB(0x82e2e4c)<<< 230 User nacpublic
> logged in. Access restrictions a
> pply.
> Net::FTP=GLOB(0x82e2e4c)>>> CWD /
> Net::FTP=GLOB(0x82e2e4c)<<< 250 CWD command
> successful.
> Net::FTP=GLOB(0x82e2e4c)>>> TYPE I
> Net::FTP=GLOB(0x82e2e4c)<<< 200 Type set to I.
> Net::FTP=GLOB(0x82e2e4c)>>> PORT 10,0,0,21,185,7
> Net::FTP=GLOB(0x82e2e4c)<<< 200 PORT command
> successful.
> Net::FTP=GLOB(0x82e2e4c)>>> NLST
> Net::FTP=GLOB(0x82e2e4c)<<< 150 Opening BINARY mode
> data connection for file lis
> t.
> Net::FTP=GLOB(0x82e2e4c)<<< 226 Transfer complete.
> FTP-Policies.html
> Net::FTP=GLOB(0x82e647c)<<<
> 220-################################################
> ##########################
> Net::FTP=GLOB(0x82e647c)<<< 220-#
> Net::FTP=GLOB(0x82e647c)<<< 220-# This FTP site is
> restricted to authorized use
> rs for legitimate
> Net::FTP=GLOB(0x82e647c)<<< 220-# business purposes
> and is subject to audit. T
> he unauthorized access,
> Net::FTP=GLOB(0x82e647c)<<< 220-# use, or
> modification of computer systems or t
> he data contained
> Net::FTP=GLOB(0x82e647c)<<< 220-# therein or in
> transit to/from, may be illegal
> .
> Net::FTP=GLOB(0x82e647c)<<< 220-#
> Net::FTP=GLOB(0x82e647c)<<< 220-# NOTE: When
> placing files on this server, rem
> ember to Stuff (.sit),
> Net::FTP=GLOB(0x82e647c)<<< 220-# BinHex (.hqx,
> .bin), or Zip (.zip) your files
> to prevent corruption.
> Net::FTP=GLOB(0x82e647c)<<< 220-#
> Net::FTP=GLOB(0x82e647c)<<< 220-# If you need
> access to this system, you will b
> e required to request
> Net::FTP=GLOB(0x82e647c)<<< 220-# a login and
> password from us directly. Anony
> mous access to this
> Net::FTP=GLOB(0x82e647c)<<< 220-# site is no longer
> supported or allowed. If y
> ou require the utilities
> Net::FTP=GLOB(0x82e647c)<<< 220-# to compress or
> decompress files that have or
> will be placed on this
> Net::FTP=GLOB(0x82e647c)<<< 220-# server, they may
> be downloaded from the appro
> priate Utilities folder
> Net::FTP=GLOB(0x82e647c)<<< 220-# (Mac or PC).
> Net::FTP=GLOB(0x82e647c)<<< 220-#
> Net::FTP=GLOB(0x82e647c)<<< 220-# NAC makes no
> claims or guarentees the integri
> ty of these files.
> Net::FTP=GLOB(0x82e647c)<<< 220-# Use them at your
> own risk.
> Net::FTP=GLOB(0x82e647c)<<<
> 220-################################################
> ##########################
> Net::FTP=GLOB(0x82e647c)<<< 220-
> Net::FTP=GLOB(0x82e647c)<<< 220-
> Net::FTP=GLOB(0x82e647c)<<< 220 ftp.nac-mi.com FTP
> server (Version wu-2.6.2(10)
> Tue Mar 11 11:53:05 EST 2003) ready.
> Net::FTP=GLOB(0x82e647c)>>> user nacpublic
> Net::FTP=GLOB(0x82e647c)<<< 331 Password required
> for nacpublic.
> Net::FTP=GLOB(0x82e647c)>>> PASS ....
> Net::FTP=GLOB(0x82e647c)<<< 230 User nacpublic
> logged
=== message truncated ===
=====
-- Terrence Brannon
Carter's Compass: "I know I'm on the right track when by deleting
something I'm adding functionality."
__________________________________
Do you Yahoo!?
SBC Yahoo! DSL - Now only $29.95 per month!
http://sbc.yahoo.com
-- Terrence Brannon
Carter's Compass: "I know I'm on the right track when by deleting something I'm adding functionality."
Do you Yahoo!?
SBC Yahoo! DSL - Now only $29.95 per month!