[16180] in Perl-Users-Digest
Perl-Users Digest, Issue: 3592 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jul 10 18:38:49 2000
Date: Mon, 10 Jul 2000 15:38:37 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <963268717-v9-i3592@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 10 Jul 2000 Volume: 9 Number: 3592
Today's topics:
Please direct me to 5.6 documentation? <webqueen@my-deja.com>
Re: Please direct me to 5.6 documentation? <care227@attglobal.net>
Re: Please direct me to 5.6 documentation? (Randal L. Schwartz)
Re: Please direct me to 5.6 documentation? <webqueen@my-deja.com>
Re: Please direct me to 5.6 documentation? <jbroz@transarc.com>
Re: Please Point me in the right direction <number1@shhhh.verticon.com>
Re: Please Point me in the right direction <nowhere@domain.com>
Re: Please Point me in the right direction (Tad McClellan)
Re: Please Point me in the right direction (Tad McClellan)
Re: Please Point me in the right direction <gellyfish@gellyfish.com>
Re: Please Point me in the right direction <gellyfish@gellyfish.com>
Re: Please Point me in the right direction (Tad McClellan)
Re: Please Point me in the right direction (Tad McClellan)
Re: Please Point me in the right direction (Bart Lateur)
Re: PPM problems <greg2@surfaid.org>
Re: PPM problems <barbr-en@online.no>
Problem running CONFIGURE.COM from perl 5.6.0 <kidprospect@softhome.net>
Problem with NET::FTP <wchong@pacific.net.sg>
Re: Problem with NET::FTP <care227@attglobal.net>
Re: Problem with NET::FTP <nnickee@nnickee.com>
Re: Problem with NET::FTP <robert.crane@btinternet.com>
Re: Problem with part of a string <ab.abson@e-contact.nl>
Re: Problem with signal handling/Pipes <gellyfish@gellyfish.com>
Re: Problem with signal handling/Pipes <kenneth.lee@alfacomtech.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 03 Jul 2000 18:25:59 GMT
From: webqueen, queen of the web <webqueen@my-deja.com>
Subject: Please direct me to 5.6 documentation?
Message-Id: <8jqlr3$ttm$1@nnrp1.deja.com>
Although www.perl.com offers Perl 5.6 as the current release,
http://www.perl.com/pub/language/info/software.html#stable
It curiously has no release comparison past 5.005:
http://www.perl.com/pub/v/documentation
What's new for perl5.005
A summary of the differences between the 5.004 and 5.005 releases...
Can someone please direct me to website(s) with comparisons of 5.6 and
previous releases?
Thank-You,
WQ
--
Time is nature's way of preventing everything from happening at once.
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 03 Jul 2000 15:44:20 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: Please direct me to 5.6 documentation?
Message-Id: <3960ED14.2447A79D@attglobal.net>
webqueen, queen of the web wrote:
>
> Can someone please direct me to website(s) with comparisons of 5.6 and
> previous releases?
http://altavista.digital.com <-- my favorite search engine, YMMV.
------------------------------
Date: 03 Jul 2000 23:22:25 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: Please direct me to 5.6 documentation?
Message-Id: <m1ya3i76u6.fsf@halfdome.holdit.com>
>>>>> "webqueen" == webqueen, queen of the web <webqueen@my-deja.com> writes:
webqueen> Can someone please direct me to website(s) with comparisons
webqueen> of 5.6 and previous releases?
Try http://search.cpan.org/doc/GSAR/perl-5.6.0/pod/perldelta.pod
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Tue, 04 Jul 2000 17:04:03 GMT
From: webqueen, queen of the web <webqueen@my-deja.com>
Subject: Re: Please direct me to 5.6 documentation?
Message-Id: <8jt5dq$lh7$1@nnrp1.deja.com>
Thank-You Randal- excellent resource you directed me to!
-wq
In article <m1ya3i76u6.fsf@halfdome.holdit.com>,
merlyn@stonehenge.com (Randal L. Schwartz) wrote:
> >>>>> "webqueen" == webqueen, queen of the web <webqueen@my-deja.com>
writes:
>
> webqueen> Can someone please direct me to website(s) with comparisons
> webqueen> of 5.6 and previous releases?
>
> Try http://search.cpan.org/doc/GSAR/perl-5.6.0/pod/perldelta.pod
>
> --
> Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777
0095
> <merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
> Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
> See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl
training!
>
--
Time is nature's way of preventing everything from happening at once.
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Wed, 05 Jul 2000 09:57:33 +0100
From: "Joe_Broz@transarc.com" <jbroz@transarc.com>
Subject: Re: Please direct me to 5.6 documentation?
Message-Id: <3962F87D.C069C7E@transarc.com>
Drew Simonis wrote:
>
> webqueen, queen of the web wrote:
> >
> > Can someone please direct me to website(s) with comparisons of 5.6 and
> > previous releases?
>
> http://altavista.digital.com <-- my favorite search engine, YMMV.
No perl content, sorry.
Try www.raging.com. I think it's Altavista without all the ads. ("Shopping
points?"... disgusting.)
------------------------------
Date: Mon, 3 Jul 2000 15:56:30 -0700
From: "Dr. Evil" <number1@shhhh.verticon.com>
Subject: Re: Please Point me in the right direction
Message-Id: <4i685.1241$4k.5645@news2.tor.primus.ca>
> open DATA,"filename.dat" or die "can't open $!\n"; #always test!
> while(<DATA>) # use $_ insted of $line
I always do..
> Check out the HTML modules from CPAN and see if they do what
> you need. HTML::Parser perhaps.
Thanks HTH.
Yes, I did see these in the docs when I downloaded Perl 6.13.
Problem, I have a strong suspsion that my ISP is still running Perl 5.0 or
they don't have 6.13 installted corectly..
They're lazy *b*st*rds* with a security through obsucirty policy.
Maybe the modules are backwards compatible, I'll give it a WRL.
I've got Perl 5.0 installed on my local test server which gurantees less
porting headaches, but I kept Perl 6.13 incase I need it.
>Re: Need to parse HTML FORM tags into associative array,
Still could use an efficient core perl solution just in case, (if one
exists) if anyone has a neat tip or trick.
------------------------------
Date: Mon, 3 Jul 2000 22:25:24 -0700
From: "Mike" <nowhere@domain.com>
Subject: Re: Please Point me in the right direction
Message-Id: <M_b85.1311$4k.6135@news2.tor.primus.ca>
But here's my first attempt..core perl no mods.. what a monster.. have a
laugh if you will.
#!/usr/bin/perl
# test_textParse.cgi
push (@INC, 'cgibin/lib');#--path
push (@INC, 'cgibin');#--path
require('cgi-lib.cgi');
print &PrintHeader;
print "<html></html><BODY>\n";
$line="<input type=\"text\" name=\"username\" value=\"samantha\">";
$query="value";
# Reduce TAGs
$line=~s/\binput\b/!i/g; ##-- ! -INPUT Character
$line=~s/\btype\b/!t/g; ##-- ! -TYPE Character
$line=~s/\bname\b/!n/g; ##-- ! -NAME Character
$line=~s/\bvalue\b/!v/g; ##-- ! -VALUE Character
%patterns=("input","\!i","type","\!t","name","\!n","value","\!v");
#substr ($string,0,n) = ''; ##--chop the n first letters of the string
$count=0;
$found=0;
$value="";
$l=length($line);
for ($count..$l){
$dblChr=substr($line,$count,2);
if ($dblChr eq "\!i"){ #--FOUND INPUT TAG
##- THE FOLLOWING TAGS GO TOGETHER
for ($count..$l){## Count from there on in
$dblChr=substr($line,$count,2);
++$count;
if ($dblChr eq $patterns{$query}){ #--FOUND TYPE TAG
for ($count..$l){## Count from there on in
$snglChr=substr($line,$count,1);
++$count;
if ($snglChr eq "\x22"){ #--FOUND OPEN QUOTES
for ($count..$l){## Count from there on
in
$snglChr=substr($line,$count,1);
if ($snglChr eq "\x22"){ #--FOUND CLOSE
QUOTES
$found=1;
last;##last 1
} ## if ($snglChr eq "\x22")
else{
$value.=$snglChr;
}## ELSE if ($snglChr eq "\x22")
++$count;
}##for ($count..$len){
if($found){last};
}##if ($snglChr eq "\x22")
}##for ($count..$len){
if($found){last};
}##if ($dblChr eq "\!t"){
}## for ($count..$len){
if($found){last};
}##if ($dblChr eq "\!i"){
++$count;
}##for ($count..$len){
print "$query = $value";
## EOS
------------------------------
Date: Mon, 3 Jul 2000 22:15:41 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Please Point me in the right direction
Message-Id: <slrn8m2i6d.d5u.tadmc@magna.metronet.com>
On Mon, 3 Jul 2000 10:05:34 -0700, mike <nowhere@domain.com> wrote:
>I've been using
> open(DATA,"filename.dat");
> while(line$=<DATA>){}
>to open an HTML form file and read it line by line.
No you haven't.
That doesn't even compile.
You should be checking the return value from open() too.
>I've searched the perlop and perlfunc and the two books I have for an
>exmaples or FAQ on parsing the line itself..
>Maybe I just can't see the solution.
use CGI; # this is the solution to the URL decoding problem
>Can someone please point me in the right direction,
use CGI;
>a sample code, lib, or
>to a command I should look up in perlfunc.
^^^^^^^^^^^
perlfunc is only one of about 50 files that document perl.
Don't ignore the other 98% of the docs!
The CGI.pm module's documentation can also be viewed with perldoc:
perldoc CGI
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 3 Jul 2000 22:12:38 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Please Point me in the right direction
Message-Id: <slrn8m2i0m.d5u.tadmc@magna.metronet.com>
On Mon, 3 Jul 2000 15:56:30 -0700, Dr. Evil <number1@shhhh.verticon.com> wrote:
>Yes, I did see these in the docs when I downloaded Perl 6.13.
There is no "Perl 6.13".
(I think you are referring to AS "build numbers" or something,
which is very different from the Perl version number.
)
The highest version number is 5.6
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 04 Jul 2000 11:54:37 GMT
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Please Point me in the right direction
Message-Id: <1gk85.1282$iP2.115812@news.dircon.co.uk>
On Mon, 3 Jul 2000 10:05:34 -0700, mike Wrote:
> I've been using
> open(DATA,"filename.dat");
open(DATA,'filename.dat') || die "Cant open 'filename.dat' - $!\n";
> while(line$=<DATA>){}
> to open an HTML form file and read it line by line.
>
> I want to parse the INPUT, NAME, VALUE tags.
> Maybe even dump then into an associative array...
> .
>
Use HTML::Parser ...
/J\
------------------------------
Date: Tue, 04 Jul 2000 11:56:13 GMT
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Please Point me in the right direction
Message-Id: <xhk85.1283$iP2.115812@news.dircon.co.uk>
On Mon, 3 Jul 2000 10:05:34 -0700, mike Wrote:
> while(line$=<DATA>){}
^^^^^
Too much BASIC programming I would say .
/J\
------------------------------
Date: Tue, 4 Jul 2000 07:05:40 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Please Point me in the right direction
Message-Id: <slrn8m3h84.dls.tadmc@magna.metronet.com>
On Mon, 3 Jul 2000 22:25:24 -0700, Mike <nowhere@domain.com> wrote:
>But here's my first attempt..core perl no mods.. what a monster.. have a
>laugh if you will.
>
>
>#!/usr/bin/perl
#!/usr/bin/perl -Tw
use strict;
>$line="<input type=\"text\" name=\"username\" value=\"samantha\">";
# look Ma, no backslashes!
$line = qq/<input type="text" name="username" value="samantha">/;
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 4 Jul 2000 08:27:27 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Please Point me in the right direction
Message-Id: <slrn8m3m1f.drs.tadmc@magna.metronet.com>
On Tue, 4 Jul 2000 07:05:40 -0400, Tad McClellan <tadmc@metronet.com> wrote:
>On Mon, 3 Jul 2000 22:25:24 -0700, Mike <nowhere@domain.com> wrote:
>>$line="<input type=\"text\" name=\"username\" value=\"samantha\">";
>
>
> # look Ma, no backslashes!
> $line = qq/<input type="text" name="username" value="samantha">/;
Errr, make that
$line = q/<input type="text" name="username" value="samantha">/;
or even
$line = '<input type="text" name="username" value="samantha">';
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 04 Jul 2000 19:37:37 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Please Point me in the right direction
Message-Id: <39633940.1156610@news.skynet.be>
Tad McClellan wrote:
>There is no "Perl 6.13".
>
>(I think you are referring to AS "build numbers" or something,
> which is very different from the Perl version number.)
It is related. 613 is build 13 of Perl 5.006 aka 5.6. 509 or whatever
the number was, was build 9 of Perl 5.005.
--
Bart.
------------------------------
Date: Mon, 03 Jul 2000 19:01:34 +0100
From: Greg Griffiths <greg2@surfaid.org>
To: Rob <rob9428@swbell.net>
Subject: Re: PPM problems
Message-Id: <3960D4FE.85936FC1@surfaid.org>
can't see anything in the bug list or on the site.
Rob wrote:
> You may want to check but I believe there is an additional patch from
> ActiveState for Win 95 and 98. As well as the ppm patch.
>
> "Greg Griffiths" <greg2@surfaid.org> wrote in message
> news:395F952A.929BCB33@surfaid.org...
> > Having rebuit my machine and re-installed the latest PERL from
> > Activestate as well as the PPM fix, I am still getting the following
> > error :
> >
> >
> >
> > Microsoft(R) Windows 98
> > (C)Copyright Microsoft Corp 1981-1998.
> >
> > C:\WINDOWS\Desktop>ppm
> > PPM interactive shell (1.1.4) - type 'help' for available commands.
> > PPM> install DBD::ODBC
> > Install package 'DBD-ODBC?' (y/N): y
> > Retrieving package 'DBD-ODBC'...
> >
> > unclosed token at line 11, column 43, byte 936 at
> > C:/Perl/site/lib/SOAP/Parser.p
> > m line 73
> > C:\WINDOWS\Desktop>
> >
> > any ideas ?
> >
> >
> >
------------------------------
Date: Sat, 8 Jul 2000 14:56:14 +0200
From: "Kåre Olai Lindbach" <barbr-en@online.no>
Subject: Re: PPM problems
Message-Id: <YwF95.9405$MS3.182101@news1.online.no>
Greg Griffiths <greg2@surfaid.org> skrev i
meldingsnyheter:39663CE3.8AFF9257@surfaid.org...
> "Kåre Olai Lindbach" wrote:
>
> > Greg Griffiths <greg2@surfaid.org> skrev i
> > meldingsnyheter:395F952A.929BCB33@surfaid.org...
> > > Having rebuit my machine and re-installed the latest PERL from
> > > Activestate as well as the PPM fix, I am still getting the following
> > > error :
> > >
> > >
> > >
> > > Microsoft(R) Windows 98
> > > (C)Copyright Microsoft Corp 1981-1998.
> > >
> > > C:\WINDOWS\Desktop>ppm
> > > PPM interactive shell (1.1.4) - type 'help' for available commands.
> > > PPM> install DBD::ODBC
> > > Install package 'DBD-ODBC?' (y/N): y
> > > Retrieving package 'DBD-ODBC'...
> > >
> > > unclosed token at line 11, column 43, byte 936 at
> > > C:/Perl/site/lib/SOAP/Parser.pm line 73
> > > C:\WINDOWS\Desktop>
> > >
> > > any ideas ?
> > >
> >
> > Have you looked into ppm.log?
> don't have one on the machine
>
READ THIS FIRST!
*By the way*, (also pointed out by 'Rob'), did you read importent info about
programs etc you had to
install prior and patches after installation of ASPerl build 613? It's
necessary to
follow the receipt! I see you have done the ppmfix.
Strange that you have none ppm.log, but you have maybe never got the ppm
running on that machine?!.
I use ActiveState perl 5.6.0 on my win98. Every time I run ppm (well, not
often), ppm makes a PPM.LOG (Capital letters) in current directory. I run
ppm using MSDOS command shell window.
-Contents looks like this:
-snip-
ppm.bat: starting up... at Tue Jul 4 19:00:57 2000
ppm.bat: starting up... at Tue Jul 4 19:01:18 2000
ppm.bat: Wrote config file at Tue Jul 4 19:08:47 2000
ppm.bat: starting up... at Tue Jul 4 19:08:53 2000
ppm.bat: valid_URL_or_file: local/parallell-port.pdd.ppd is not valid at Tue
Jul 4 19:12:31 2000
ppm.bat: Could not locate a PPD file for package parallell-port.pdd at Tue
Jul 4 19:12:31 2000
ppm.bat: valid_URL_or_file: local/win32-serialport.ppd.ppd is not valid at
Tue Jul 4 19:13:35 2000
ppm.bat: Could not locate a PPD file for package win32-serialport.ppd at Tue
Jul 4 19:13:35 2000
ppm.bat: Removed repository HASH(0x93a157c) at Tue Jul 4 19:15:07 2000
-cut-
By the way, when I once set the repository using embracing one parameter
with ", ppm also gave up and died. I had to go directly into config-file:
'<perl-dir>\site\lib\ppm.xml' and correct it using an editor.
There is an configPPM.pl, which most likely is run on installation, maybe
that have failed. I dare not test it on my machine, since ppm works. Maybe
others have something to add here. I feel ppm is not very well documented,
foolproofed nor tested, although it's an importent program for win-users.
Well, it's possible to do the work yourself, putting all the files in right
dirs......
Also, look into PPMConfig.html. There you might compare your ppm.xml against
a sample. (If you are familiar to html/xml syntax)
I *think* your problem lies in your "ppm.xml" -file, if you have clean
conscience about the patches etc.
Maybe it's easiest to remove ASPerl using
Start->Setup->Controlpanel->Add/remove programs (Hope I'm correct, I use
an norwegian version of win98), and reinstall it all together. Since your
ppm isn't working, you probably havent installed much libs anyway.
Regards
--
mvh
Kåre Olai Lindbach
(LLP - 955626397 MVA)
+ 47 61282501(home/job)
+ 47 61282502(fax)
barbr-en@online.no
# a perl programming man (ppm), it was?!.......;-)
------------------------------
Date: Fri, 7 Jul 2000 23:56:21 -0400
From: "Kid Prospect" <kidprospect@softhome.net>
Subject: Problem running CONFIGURE.COM from perl 5.6.0
Message-Id: <hux95.704$eN5.20514@reader1.interactive.net>
When I run configure.com from anywhere including the command prompt of Win2k
I get:
Program too big to fit in memory
Is there anyway to configure and generate the Makefile?
------------------------------
Date: Thu, 06 Jul 2000 20:57:03 +0800
From: chee hong <wchong@pacific.net.sg>
Subject: Problem with NET::FTP
Message-Id: <3964821E.189A59EB@pacific.net.sg>
Hi there,
Below is my script for performing a FTP.
use Net::FTP;
$username = "userid";
$password = "password";
$host = "203.116.93.133";
$ftp = Net::FTP->new("$host", Debug => 1); <<<< line 6
$ftp->login($username, $password) or die "cant login\n";
Everytime I run my script, the following error message appears.
Can't locate object method "new" via package "Net::FTP" at test.pl line
6.
What is wrong?
Thank you.
Chee Hong
------------------------------
Date: Thu, 06 Jul 2000 10:03:25 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: Problem with NET::FTP
Message-Id: <396491AD.B555A290@attglobal.net>
chee hong wrote:
>
> use Net::FTP;
>
> $username = "userid";
> $password = "password";
> $host = "203.116.93.133";
> $ftp = Net::FTP->new("$host", Debug => 1); <<<< line 6
> $ftp->login($username, $password) or die "cant login\n";
>
> Everytime I run my script, the following error message appears.
>
> Can't locate object method "new" via package "Net::FTP" at test.pl line
> 6.
You don't use strict; for one. I did, and it worked just fine as is
for me. (I also did it without strict and with global variables, and
that worked just fine too. but use strict; is usually prefered.)
I'm using perl 5.005_03 on Linux with libnet-1.0606 as a test system.
--
#! /usr/bin/perl -w
use strict;
use Net::FTP;
my $username = "userid";
my $password = "password";
my $host = "203.116.93.133";
my $ftp = Net::FTP->new("$host", Debug => 1);
$ftp->login($username, $password) or die "cant login\n";
------------------------------
Date: Thu, 06 Jul 2000 14:40:28 -0500
From: Nnickee <nnickee@nnickee.com>
Subject: Re: Problem with NET::FTP
Message-Id: <3AB765F8A8C14B82.B0368CB35F6B9A91.F0A17BACBDF10D3C@lp.airnews.net>
On Thu, 06 Jul 2000 20:57:03 +0800, someone claiming to be chee hong
<wchong@pacific.net.sg> said:
>Hi there,
>Below is my script for performing a FTP.
>use Net::FTP;
>$username = "userid";
>$password = "password";
>$host = "203.116.93.133";
>$ftp = Net::FTP->new("$host", Debug => 1); <<<< line 6
>$ftp->login($username, $password) or die "cant login\n";
>Everytime I run my script, the following error message appears.
>Can't locate object method "new" via package "Net::FTP" at test.pl line
>6.
>What is wrong?
Have you *manually* installed the libnet bundle? It comes with
activestate's perl, but I've noticed that on my systems and on a few
other people's systems at least, the modules in it don't get fully
installed until you manually install it.
Open up a dos prompt, in it type: ppm
then type install libnet
answer yes if it gives you any grief about re-installing or
reconfiguring
another dos window will pop up, answer y to the first question about
configuration, then either put in correct answers or just hit Enter to
have it default on all the other questions.
After you exit ppm, your script should work.
Nnickee
------------------------------
Date: Fri, 7 Jul 2000 00:21:32 +0100
From: "Robert Crane" <robert.crane@btinternet.com>
Subject: Re: Problem with NET::FTP
Message-Id: <8k365f$9mc$1@uranium.btinternet.com>
Hi,
I too have had similar problems but mine is caused when trying to obtain a
DIR or LS.
I'm simply doing:
@flist = $ftp->ls();
but I get an error message of
Net::FTP: Unexpected EOF on command channel at rjcftp.pl line 21
I've tried this with other commands that return values (as opposed to
commands such as CWD, TYPE etc) and always get the same failures.
I've looked for some examples, including the ones in the PRK but still cant
get it to work.
I'm running 5.005 of Perl
Drew Simonis <care227@attglobal.net> wrote in message
news:396491AD.B555A290@attglobal.net...
> chee hong wrote:
> >
> > use Net::FTP;
> >
> > $username = "userid";
> > $password = "password";
> > $host = "203.116.93.133";
> > $ftp = Net::FTP->new("$host", Debug => 1); <<<< line 6
> > $ftp->login($username, $password) or die "cant login\n";
> >
> > Everytime I run my script, the following error message appears.
> >
> > Can't locate object method "new" via package "Net::FTP" at test.pl line
> > 6.
>
> You don't use strict; for one. I did, and it worked just fine as is
> for me. (I also did it without strict and with global variables, and
> that worked just fine too. but use strict; is usually prefered.)
>
> I'm using perl 5.005_03 on Linux with libnet-1.0606 as a test system.
>
> --
> #! /usr/bin/perl -w
>
> use strict;
>
> use Net::FTP;
>
> my $username = "userid";
> my $password = "password";
> my $host = "203.116.93.133";
> my $ftp = Net::FTP->new("$host", Debug => 1);
> $ftp->login($username, $password) or die "cant login\n";
------------------------------
Date: Mon, 3 Jul 2000 17:47:54 +0200
From: "Ab Abson" <ab.abson@e-contact.nl>
Subject: Re: Problem with part of a string
Message-Id: <3960b8d5$0$25224@reader2>
Thanks, this is what I want.
Ab.
------------------------------
Date: 4 Jul 2000 09:44:53 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Problem with signal handling/Pipes
Message-Id: <8js865$e2k$1@orpheus.gellyfish.com>
On Mon, 03 Jul 2000 19:47:58 +0800 Kenneth Lee wrote:
> I have a script which have an infinite loop (with sleep, of coz) waiting
> for some event to happen.
> In initialization I have opened a pipe with logger
>
> open LOG, "|/usr/bin/logger ... " or die $!;
>
> and in the middle I'll print message to LOG for logging purposes.
>
> I also have a handler for signals INT, QUIT and TERM. When I use Ctrl-C
> to break my program, any I/O function calls give me Broken Pipe error.
> Why?
Because that is the the signal that is sent to the later program - set a
handler to $SIG{PIPE} ...
/J\
--
** This space reserved for venue sponsor for yapc::Europe **
<http://www.yapc.org/Europe/>
------------------------------
Date: Tue, 04 Jul 2000 17:02:27 +0800
From: Kenneth Lee <kenneth.lee@alfacomtech.com>
Subject: Re: Problem with signal handling/Pipes
Message-Id: <3961A823.40ADFB6D@alfacomtech.com>
Oops... thanks for the pointer. I should have read the Camel twice
before posting a question...
Jonathan Stowe wrote:
>
> On Mon, 03 Jul 2000 19:47:58 +0800 Kenneth Lee wrote:
> > I have a script which have an infinite loop (with sleep, of coz) waiting
> > for some event to happen.
> > In initialization I have opened a pipe with logger
> >
> > open LOG, "|/usr/bin/logger ... " or die $!;
> >
> > and in the middle I'll print message to LOG for logging purposes.
> >
> > I also have a handler for signals INT, QUIT and TERM. When I use Ctrl-C
> > to break my program, any I/O function calls give me Broken Pipe error.
> > Why?
>
> Because that is the the signal that is sent to the later program - set a
> handler to $SIG{PIPE} ...
>
> /J\
>
> --
> ** This space reserved for venue sponsor for yapc::Europe **
> <http://www.yapc.org/Europe/>
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V9 Issue 3592
**************************************
