On Tue, 23 Aug 2005 01:09:56 +0000
"Terrence Brannon" <bauhaus@...> wrote:
> Eric Wang <ericw12@...> writes:
>
> > Hi guys,
>
> Hi Eric,
>
> > >
> > I am using activeperl 5.8 and try to check if files are exist on a remoteftp
server,
> > but I got tons of stuff in stardard error, I guess.
> >
> > ....
> > $common_cfg = { Host => $ftpserver,
> > User => $username,
> > Pass => $password,
> > RemoteDir => $RemoteDir
> > } ;
> >
> > my $ftp = Net::FTP::Common->new($common_cfg, Debug => 0);
> >
> > $ftp->login or die sendmail($smtp,$from,$to,"Report Job: CUCBC FTP
logon failure");
>
> You never have to call login() before using a Net::FTP::Common method
>
> > foreach (@files) {
> > my $exist=$ftp->exists(RemoteFile => $_);
> > print "$_ : $exist\n";
> > }
> > $ftp->quit;
> > ...
> >
> > The script supposes only to print this
> >
> > DAIL0822.015 : 0
> >
> > But instead of it print all this crap below,
>
> sorry, here's a fix for line 249 in Common.pm
>
> warn sprintf "[checking @listing for [%s]]", $rf if $self->{Debug} ;
>
> > and with this "Not a GLOB reference at C:/Perl/lib/Net/FTP.pm line
> > 1103." Help please, I guess if this doesn't work, I will have to
> > look at LWP.
>
> That is just a warning. The docs for Net::FTP::Common discuss this in
> the NOTES section.
hi, Terrence,
Thanks! but the Glob warning is such a anonying warning, every script of mine
using Net::Ftp::Common has it.
>
>
>
> SPONSORED LINKS
> C programming language Computer programming languages The c
programming language
> C programming language List of programming languages Programming
languages
>
>
> ------------------------------------------------------------
> YAHOO! GROUPS LINKS
>
> Visit your group "net-ftp-common" on the web.
> To unsubscribe from this group, send an email to:
> net-ftp-common-unsubscribe@yahoogroups.com
> Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
>
>
> ------------------------------------------------------------
>
>