[6839] in Perl-Users-Digest
Perl-Users Digest, Issue: 464 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue May 13 04:07:24 1997
Date: Tue, 13 May 97 01:00:40 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Tue, 13 May 1997 Volume: 8 Number: 464
Today's topics:
Re: @r=($a=~/./g) Sets @r to the list of matching eleme <fawcett@nynexst.com>
[2nd DRAFT] RFD: comp.lang.perl reorg (A. Deckers)
____HELP, How Do I know Which Banner Clicked (Deepak Dutta)
Re: A Perl Question (Chipmunk)
Re: A Perl Question (Chipmunk)
Camel Book Co-Author Randal Schwart Teaching Advanced P <stevev@dynamicweb.com>
CGI Scripts With MacPerl: How to Handle Multiple Reques (stuart)
Decimals in PERL5 <Gssatte@Bellsouth.net>
Re: Decimals in PERL5 (A. Deckers)
Error during Make <tsoft@pacbell.net>
Re: fork and file i/o (Scott)
Re: FTP using LWP (Matthew Burnham)
Re: Have a question? Post it here at the CGI Discussion (Tad McClellan)
HELP NEEDED WITH GUESTBOOK! (Manik Ahuja)
Re: how do I get a binary representation of a number in <fawcett@nynexst.com>
Re: How Does Someone Copy a File in perl? (I R A Aggie)
Re: How to do a "less" on a file. (Jordyn A. Buchanan)
I Have a Syntax Problem, Need Help! <rwatkins@crosslink.net>
Linux SEGV, Perl4, inodes ... (Andrew Daviel)
Need Help! (Jim Wilson)
Re: New draft of scripting white paper (Leslie Mikesell)
Re: New draft of scripting white paper <cimarron@dis.org>
Re: oraperl on solaris 2.5/oracle 7.3 <thnlog@hotmail.com>
Perl 5.003_07 and FrontPage 97 <media@telcel.net.ve>
perlscript installation problems <A.Huebsch@magnet.at>
Re: readdir -t ? <merlyn@stonehenge.com>
Re: Sorting by date with format MMDDYY (Andrew M. Langmead)
Re: testing for non-existence in an associative array?? <simonk@telebusiness.co.nz>
US-NY-LI Perl, SQL, Unix, HTML, Internet Dev greg@nettrust.com
Using variable to name an array???? <sfling@pcisys.net>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 10 May 1997 15:21:27 -0400
From: Tom Fawcett <fawcett@nynexst.com>
Subject: Re: @r=($a=~/./g) Sets @r to the list of matching elements
Message-Id: <8jpvuz9lqg.fsf@nynexst.com>
etienne@isr.isr.ist.utl.pt (Etienne Grossmann) writes:
> Is the fact that
>
> @r=($a=~/./g) Sets @r to the list of matching elements
>
> a normal perl feature? (I did not see it in the man pages)
It's in the perlop man page:
The `/g' modifier specifies global pattern matching--that is, matching as
many times as possible within the string. How it behaves depends on the
context. In a list context, it returns a list of all the substrings
matched by all the parentheses in the regular expression. If there are no
parentheses, it returns a list of all the matched strings, as if there
were parentheses around the whole pattern.
Your particular pattern is probably less efficient than just:
@r = split(//, $a);
-Tom
------------------------------
Date: 13 May 1997 01:01:36 GMT
From: I-hate-cyber-promo@man.ac.uk (A. Deckers)
Subject: [2nd DRAFT] RFD: comp.lang.perl reorg
Message-Id: <slrn5nffbf.1vu.I-hate-cyber-promo@nessie.mcc.ac.uk>
[Followups set to news.groups.]
===
NOTE for the benefit of news.groupies who have not seen a previous
draft: I published an earlier and very preliminary draft to
comp.lang.perl.misc. In the meantime, some suggestions concerning the
charter have come in from readers of that group. A _non-binding_ straw
poll was held to find out which group names/topics were the most
popular, but the results, which haven't been released other than to the
proponents, were inconclusive. Suffice to say that the group names
included in this draft RFD received the greater number of favourable
votes and seem to me to be the most appropriate ones (and I haven't
heard anything to the contrary from the other proponents). Further
modifications have been made after consultations among the proponents,
but I feel it is now time to open this proposal to public scrutiny in
news.groups, so go ahead and do what you have to do. :-)
===
REQUEST FOR DISCUSSION
moderated comp.lang.perl.data-structure
moderated comp.lang.perl.inter-process
moderated comp.lang.perl.programmer
moderated comp.lang.perl.regex
This is an PRELIMINARY Request for Discussion (RFD) for the
creation of world-wide moderated Usenet newsgroups in the
comp.lang.perl hierarchy. This is not a call for votes; you
cannot vote at this time. Procedural details are below.
Newsgroups lines:
comp.lang.perl.data-structure Using Perl data-structures. (Moderated)
comp.lang.perl.inter-process Implementing inter-process communications in Perl. (Moderated)
comp.lang.perl.programmer General non-FAQ issues concerning Perl programming. (Moderated)
comp.lang.perl.regex Using Perl regular expressions. (Moderated)
RATIONALE: all groups
Most Perl-related issues are currently discussed in
comp.lang.perl.misc (clpm). The statistics compiled by one of the
proponents indicate that this group regularly receives more than
one thousand articles from approximately 500 posters each week, a
volume of traffic many readers find overwhelming.
In addition, a significant fraction of the traffic on clpm
consists of off-topic articles, many of them widely cross-posted
through the comp.* hierarchy and ammounting to little more than
flame-wars, articles asking questions that are answered in the
FAQs, and above all, a regular flow of articles asking questions
related to the Common Gateway Interface (CGI) but unrelated to
Perl.
In these circumstances, a number of regular posters to the group
have stopped reading clpm, while new readers can find it
difficult to find relevant posts. Both facts result in a reduced
usefullness of the existing clpm newsgroup.
These comp.lang.perl groups are therefore proposed as high
signal-to-noise moderated newsgroups where readers are not
subjected to the types of articles described above. The intention
is both to provide a usefull resource for inexperienced Perl
programmers, and to attract and retain experienced programmers
who can make a substantial contribution to the group.
In the light of experience in clpm, moderation is considered
essential to ensure a sufficiently high signal-to-noise ratio
that will guarantee the usefullness of the proposed groups.
The thematic split is proposed in order to provide more
specialised groups where readers (and posters) can follow topics
in which they have a special interest without necessarily having
to see articles related to other aspects of Perl.
CHARTER: all groups
The group shall be moderated using a Perl script, which shall be
overseen by a moderation panel. The moderation panel may at its
discretion implement any technical solutions it considers
necessary to enforce the provisions of this charter.
Initially, any article containing one of a list of valid keywords
designated by the moderation panel shall be approved, subject to
the provisions listed below.
The moderation script shall be configured to reject any article:
+ which is cross-posted, save for the blanket cross-posting
provisions described below;
+ which is deemed to contain a binary file. In so far as it is
practicable, the moderation script shall be configured so as to
pass PGP signatures and similar authentication schemes, while
rejecting articles containing binary files;
+ which is deemed to be encoded primarily using a markup scheme,
with the exception of Plain Old Documentation (POD). In so far
as it is practicable, the moderation script shall be configured
so as to pass articles containing short fragments of markup
embedded within them;
+ which is deemed to be encoded in any MIME type considered
inappropriate by the moderation panel. Initially, only articles
of text/plain MIME type will be accepted by the moderation
script;
+ which is deemed to contain more quoted than unquoted text. This
condition will not be applied to articles containing fewer than
40 lines of body text, excluding the signature if one is found.
Articles without any unquoted text, not taking into account the
signature if one is present, will be rejected;
+ which has a subject header starting with the string 'Re: ' and
doesn't contain a references header;
+ which contains a signature over 6 lines in length.
In the context of this charter, a signature is defined as
everything found after the last cut line, ie /^-- $/, found in
the article. Posters are requested to make use of such cut lines
to delimit their signature from the article body.
Any article whose primary purpose is the advertisement of a
commercial property, good or service, including job offers and
demands, MLMs and MMFs, shall be off-topic and therefore
forbidden in the group. The moderation panel may at its
discretion implement appropriate technical solutions to ensure
such articles are not published in the group.
Posters are requested to use informative subject lines, to be
concise and to the point, and to include in their posts any
relevant diagnostic information and code. The moderation panel
may at its discretion implement technical measures to enforce all
or part of this provision.
Posters are requested not to post answers to questions which are
explicitly addressed in the documentation, including the relevant
FAQs. A pointer to the relevant resource should instead be
emailed to the questionner.
A single copy of any article rejected by the moderation process
will be returned to its author together with a copy of the
charter of the relevant group and a brief note explaining the
reason for the rejection.
The moderators of comp.lang.perl.announce, comp.answers and
news.announce.newgroups, and any succesor groups thereto, are
hereby granted blanket permission to cross-post to the proposed
groups at their discretion.
While permission to routinely cross-post to the group will not be
granted in other cases, the moderation panel will consider
requests on a case-by-case basis, and grant their approval if
they deem that this would be of significant benefit to the
readership of the group. This provision applies especially, but
is not limited to, relevant FAQs.
The moderation panel will consist of no fewer than 5 and no more
than 10 members. In the case of a temporary abscence by a member
of the moderation panel, he or she shall nominate a replacement
for the duration of said abscence. New members may be appointed
upon the permanent departure of an existing member, or as the
moderation panel deems appropriate.
With the exception noted in the next paragraph, the moderation
panel shall take all its decisions on the basis of a simple
majority vote among its current members, and formulate and
publish additional terms of reference, including rules of
procedure, in accordance with the provisions of this charter, at
its earliest convenience.
The moderation panel may depose one of its members if a motion to
this effect is approved by a majority of 2/3 of existing members.
The moderation script will be distributed to persons approved by
the moderation panel, solely for the purpose of installing it at
the former's site and injecting articles into their local news
server in accordance with the provisions of this charter.
Sites shall receive articles submitted to the group by means of a
distribution list established for this purpose by the moderation
panel, all of whose members will be granted administrative rights
over this list.
Any site found to be injecting articles in contravention of this
charter will be unsubscribed from the abovementioned distribution
list at the earliest convenience of the moderation panel and
banned from re-subscribing for a period of time to be decided by
the panel.
The moderation panel may gate aproved articles to a mailing list.
All members of the moderation panel shall be authorised to cancel
any article that has not passed through an authorised moderation
site.
Any article submitted by a member of the moderation panel outside
the exercise of his or her administrative role will be subject to
the full moderation procedure described herein.
END CHARTER
CHARTER: comp.lang.perl.data-structure
The group comp.lang.perl.data-structure will deal with issues
related to Perl's data-structures as described in the perldata,
perldsc, perllol, perlobj and related manual pages included in
the Perl distribution.
Any article which doesn't address issues related to Perl's data
structures will be off-topic in this group, and the moderation
panel may at its discretion implement appropriate technical
solutions to ensure they are not published in the group.
Initially, the list of valid keywords for comp.lang.perl.data-
structure will consist of the following: scalar, array, list,
hash, string, object, reference, typeglob and their plurals;
END CHARTER
CHARTER: comp.lang.perl.inter-process
The group comp.lang.perl.inter-process will deal with issues
related to the implementation of interprocess communications
(signals, fifos, pipes, safe subprocesses, sockets and
semaphores) in Perl.
Any article which doesn't address issues related to the
implementation of inter-process communication in Perl structures
will be off-topic in this group, and the moderation panel may at
it discretion take appropriate measures to ensure that such
articles are not published in the group.
Initially, the list of valid keywords shall consist of the
following: open, spawn, signal, fifo, pipe, child, parent, pid,
socket, semaphore, subprocess and their plurals.
END CHARTER
CHARTER: comp.lang.perl.programmer
The group comp.lang.perl.programmer will deal with all general
Perl-related issues that are not explicitly addressed in Perl's
documentation, where documentation is defined as anything which is
found in the <URL:http://www.perl.com/CPAN/doc/> directory, and
which exceed the scope or don't match the subject matter of
other comp.lang.perl groups.
Any article which doesn't satisfy the preceding criteria will be
off-topic in this group, and the moderation panel may at its
discretion adopt technical measures to ensure that they are not
published in comp.lang.perl.programmer.
Initially, the list of valid keywords will consist of all of
Perl's functions.
END CHARTER
CHARTER: comp.lang.perl.regex
The group comp.lang.perl.regex will deal with issues related to
Perl's regular expressions as described in the perlre manual
page and related documents.
Any article which doesn't address issues related to Perl's
regular expression will be off-topic in this group, and the
moderation panel may adopt appropriate technical solutions to
ensure that such articles are not posted in the group.
Initially, the list of valid keywords will consist of the
following strings: match, regex, regular expression, pattern,
wildcard, $1 .. $0, $`, $', $&, \1 .. \9, =~, !~, m/, s/ and
their plurals (where appropriate).
END CHARTER
MODERATOR INFO: comp.lang.perl.data-structure
Moderator: Russ Allbery <rra@stanford.edu>
Moderator: Greg Bacon <gbacon@cs.uah.edu>
Moderator: Tom Christiansen <tchrist@jhereg.perl.com>
Moderator: Alain Deckers <deckers@man.ac.uk>
Moderator: Andrew M. Langmead <aml@world.std.com>
Moderator: Tad McClellan <tadmc@flash.net>
Moderator: Chris Nandor <pudge@pobox.com>
Submission address: clp-data@perl.com
Administrative address: clp-data-request@perl.com
END MODERATOR INFO
MODERATOR INFO: comp.lang.perl.inter-process
Moderator: Russ Allbery <rra@stanford.edu>
Moderator: Greg Bacon <gbacon@cs.uah.edu>
Moderator: Tom Christiansen <tchrist@jhereg.perl.com>
Moderator: Alain Deckers <deckers@man.ac.uk>
Moderator: Andrew M. Langmead <aml@world.std.com>
Moderator: Tad McClellan <tadmc@flash.net>
Moderator: Chris Nandor <pudge@pobox.com>
Submission address: clp-interprocess@perl.com
Administrative address: clp-interprocess-request@perl.com
END MODERATOR INFO
MODERATOR INFO: comp.lang.perl.programmer
Moderator: Russ Allbery <rra@stanford.edu>
Moderator: Greg Bacon <gbacon@cs.uah.edu>
Moderator: Tom Christiansen <tchrist@jhereg.perl.com>
Moderator: Alain Deckers <deckers@man.ac.uk>
Moderator: Andrew M. Langmead <aml@world.std.com>
Moderator: Tad McClellan <tadmc@flash.net>
Moderator: Chris Nandor <pudge@pobox.com>
Submission address: clp-programmer@perl.com
Administrative address: clp-programmer-request@perl.com
END MODERATOR INFO
MODERATOR INFO: comp.lang.perl.regex
Moderator: Russ Allbery <rra@stanford.edu>
Moderator: Greg Bacon <gbacon@cs.uah.edu>
Moderator: Tom Christiansen <tchrist@jhereg.perl.com>
Moderator: Alain Deckers <deckers@man.ac.uk>
Moderator: Andrew M. Langmead <aml@world.std.com>
Moderator: Tad McClellan <tadmc@flash.net>
Moderator: Chris Nandor <pudge@pobox.com>
Submission address: clp-regex@perl.com
Administrative address: clp-regex-request@perl.com
END MODERATOR INFO
DISTRIBUTION:
This [DRAFT] RFD has been posted to the following groups:
news.groups
comp.lang.perl.misc
comp.lang.perl.modules
comp.lang.perl.tk
Proponent: Russ Allbery <rra@stanford.edu>
Proponent: Greg Bacon <gbacon@cs.uah.edu>
Proponent: Tom Christiansen <tchrist@jhereg.perl.com>
Proponent: Alain Deckers <deckers@man.ac.uk>
Proponent: Andrew M. Langmead <aml@world.std.com>
Proponent: Tad McClellan <tadmc@flash.net>
Proponent: Chris Nandor <pudge@pobox.com>
--
deckers@man.ac.uk (A. Deckers) <URL:http://www.man.ac.uk/%7Embzalgd/>
------------------------------
Date: Sat, 10 May 1997 18:00:35 GMT
From: ddutta@siu.edu (Deepak Dutta)
Subject: ____HELP, How Do I know Which Banner Clicked
Message-Id: <3374b7c1.169717013@saluki-news.siu.edu>
I am really puzzled about LINKEXCHANGE and BANNER SWAP Mechanism.
I understand completely how they keep track of number of banners
displayed on each participant's site.
Once a banner is displayed on some body's site for a vistor and if the
same vistor clicks on that banner, how the program knows which banner
is clicked to redirect to that site (I know redirection using PERL)
Let's say on site X banner Y is displayed for Visitor Z. When visitor
Z clicks on the Y banner, how the program knows that it is Y banner
and redirects to Y banner's site?
I will appreciate any explanation of this puzzling question that is
bothering me for some time.
Thanks
Deepak Dutta
------------------------------
Date: 10 May 1997 17:02:10 GMT
From: Ronald.J.Kimball@dartmouth.edu (Chipmunk)
Subject: Re: A Perl Question
Message-Id: <5l29mi$u7p$3@dartvax.dartmouth.edu>
In article <5ktk9t$d8m$1@news7.gte.net>
"William Stranathan" <stranw@gte.net> writes:
> try:
>
> $summary =~ s/(.*)\((.*)/\1\2/;
> I know that's weird looking, but...
>
> Search for 0 or more of any kind of character, followed by an open paren
> followed by any number of chars. Replace with the first set of chars, then
> the second.
> Ooops! Gurus: with regexps being as greedy as they are, would the
> following happen?
>
> $summary = "foo((bar";
> $summary = s/(.*)\((.*)/\1\2/;
> print "$summary";
>
> would that give foo(bar ?
Yes, it would. Of course, without the /g modifier, it'll only change
one parenthesis anyway.
s/(.*)\((.*)/$1$2/g;
would also give foo(bar, however, because the second (.*) matches the
rest of the string.
Why match (.*) unnecessarily?
Just use:
s/\(//g;
or, in this case:
tr/\(//d;
Chipmunk
------------------------------
Date: 10 May 1997 16:58:15 GMT
From: Ronald.J.Kimball@dartmouth.edu (Chipmunk)
Subject: Re: A Perl Question
Message-Id: <5l29f7$u7p$2@dartvax.dartmouth.edu>
In article <g85uk5.392.ln@localhost>
tadmc@flash.net (Tad McClellan) writes:
> : and
> : if ($summary=~ /(|)/{ # where $summary has the string I am searching in.
> ^^^^^^^^^^^^^^^^
> Now this one has the // for the pattern match unbalanced (the second
> one is outside of the if() expression...
Nope, this is another 'if (' without a corresponding ')'. The ')' in
the above line matches the ''( within the pattern match.
What it should be is:
if ($summary =~ /(|)/ ) {
except, of course, that the poster wants to match the parens, so:
if ($summary =~ /\(|\)/ ) {
is correct.
Chipmunk
------------------------------
Date: Sat, 10 May 1997 13:40:20 +0100
From: Steve Vanechanos <stevev@dynamicweb.com>
Subject: Camel Book Co-Author Randal Schwart Teaching Advanced Perl in NYC/NJ on May 15th
Message-Id: <33746CB3.78D7@dynamicweb.com>
We are hosting an open enrollment, one day, advanced perl seminar,
taught by Randal Schwartz on May 15th, in Fairfield NJ.
To REGISTER http://www.dynamicweb.com/perl_class.html
--
Steve Vanechanos, CEO www.dynamicweb.com
DynamicWeb Enterprises, Inc. voice: 201-244-1000
271 Rt 46 West, Fairfield, NJ 07004 fax: 201-777-7428
NASD BB(DWEB) stevev@dynamicweb.com
------------------------------
Date: Sun, 11 May 1997 17:23:14 -0500
From: Stuart_Weisberg@brown.edu (stuart)
Subject: CGI Scripts With MacPerl: How to Handle Multiple Requests for the Same Script
Message-Id: <Stuart_Weisberg-1105971723140001@bootp-69.caswell.brown.edu>
I've written a CGI perl script in MacPerl. I need to know how to make a
Macintosh web server deal with multiple requests for the same perl script.
Currently the request that gets there first gets executed and the second
one gets ignored. I'd thank you for a reply.
------------------------------
Date: 10 May 1997 17:25:34 GMT
From: "Greg Satterfield" <Gssatte@Bellsouth.net>
Subject: Decimals in PERL5
Message-Id: <01bc5d67$2b315800$0100007f@localhost>
Can someone tell me how to format numbers in perl to 2 decimal points?
Example, after a math calculation, how can I change the number
859.68542567832 to 859.68?
Thanks,
Greg
------------------------------
Date: 10 May 1997 17:45:54 GMT
From: I-hate-cyber-promo@man.ac.uk (A. Deckers)
Subject: Re: Decimals in PERL5
Message-Id: <slrn5n9d2i.cig.I-hate-cyber-promo@news.rediris.es>
In comp.lang.perl.misc,
Gssatte@Bellsouth.net wrote:
>
>Can someone tell me how to format numbers in perl to 2 decimal points?
Yes, I could. But since it's all in the free documentation that's
included in the Perl distribution, you can just as easily look it up
yourself. You might even learn something you didn't know. :-)
BTW, the answer is also in the Perl FAQ.
HTH,
Alain
--
Perl information: <URL:http://www.perl.com/perl/>
Perl FAQ: <URL:http://www.perl.com/perl/faq/>
Perl archive: <URL:http://www.perl.com/CPAN/>
>>>>>>>>>>>>> NB: comp.lang.perl.misc is NOT a CGI group <<<<<<<<<<<<<<
------------------------------
Date: Mon, 12 May 1997 20:06:21 -0700
From: Jerry Smith <tsoft@pacbell.net>
Subject: Error during Make
Message-Id: <3377DAAD.D2D@pacbell.net>
During the 'make' for perl5.003, I got the following error message:
`sh cflags libperl.a regexec.o` regexec.c
CCCMD = cc -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2
`sh cflags libperl.a taint.o` taint.c
CCCMD = cc -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2
`sh cflags libperl.a deb.o` deb.c
CCCMD = cc -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2
`sh cflags libperl.a globals.o` globals.c
CCCMD = cc -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2
rm -f libperl.a
ar rcu libperl.a perl.o gv.o toke.o perly.o op.o regcomp.o dump.o
util.o mg.o h
v.o av.o run.o pp_hot.o sv.o pp.o scope.o pp_ctl.o pp_sys.o doop.o
doio.o regexe
c.o taint.o deb.o globals.o
cc -L/usr/local/lib -o miniperl miniperlmain.o libperl.a -lgdbm -ldb
-ldl -lm -
lc
/usr/i486-linux/bin/ld: cannot open -ldl: No such file or directory
make: *** [miniperl] Error 1
There is a directory called '/usr/i486-linux/bin/ld', but there is
only one file in there (a link):
lrwxrwxrwx 1 root root 12 May 7 17:22 ld -> /../bin/ld*
Any recommendations for correcting this problem? Oh, this is
compiling for use on Linux. Thanks a bunch.
Jerry Smith
------------------------------
Date: Tue, 13 May 1997 02:44:32 GMT
From: seligman@netcom.com (Scott)
Subject: Re: fork and file i/o
Message-Id: <seligmanEA3MA9.MG@netcom.com>
In article <5l8762$18h@yankee.caltech.edu>,
Cheryl L. Southard <cld@yankee.caltech.edu> wrote:
> Hi All,
>
> Included is a very short perl script that does NOT do what I expect it
> to do. It is supposed to open a file, then print each line once.
> However, what it does for me is to print out all the lines in the file,
> rewind the file, then print them again, and sometimes a third time and
> fourth time, and sometimes it skips lines in the file.
Quoted from man perlfunc:
] fork Does a fork(2) system call. Returns the child pid
] to the parent process and 0 to the child process, or
] undef if the fork is unsuccessful. Note: unflushed
] buffers remain unflushed in both processes, which
] means you may need to set [...] to avoid
] duplicate output.
[...]'s so you'll actually read the manual.
--
-- Scott Seligman will hack perl for airplane tickets
-- email: seligman@netcom.com
------------------------------
Date: Mon, 12 May 1997 18:16:21 GMT
From: danew@enterprise.net (Matthew Burnham)
Subject: Re: FTP using LWP
Message-Id: <3378508c.4128520@194.72.192.4>
Alex Schajer <schajer@dircon.co.uk> wrote:
>please reply directly as my newsreader is dodgy.
Sounds like you need a new newsreader
--
Matthew Burnham, Manager, MindWeb | danew@enterprise.net
Commercial web design and hosting, reasonable rates
UKP24/Mb/Year for DIY space | mindweb@pobox.co.uk
FTP, CGI, password protection, etc. too!
http://www.virtual-pc.com/mindweb/
------------------------------
Date: Sat, 10 May 1997 08:56:16 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Have a question? Post it here at the CGI Discussion Forum.
Message-Id: <0qu1l5.ks.ln@localhost>
for spam reasons the real address is in the bodyTOTO (sorry@no.can.do) wrote:
: On Thu, 8 May 1997 23:05:13 -0500, tadmc@flash.net (Tad McClellan)
: wrote:
: >I didn't even have to go to the site to know that is was silly.
: >Because in the original post:
: >No usable address in the From:
: >No Reply-to:
: >No email address in the .sig
: For the record it is shootem@hotmail.com
: >
: >Anonymous postings are a dead giveaway...
: See above
: Now do you have anything constructive to post?
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
I seem to recall posting an answer to clpm at least once before.
If you really care to know, I suppose you could go search for my
address at Dejanews, and decide for yourself if they are constructive
or not...
Dejanews shows no followups from you in *any* of your postings,
only original posts with advertising.
Pot... kettle... black.
--
Tad McClellan SGML Consulting
Tag And Document Consulting Perl programming
tadmc@flash.net
------------------------------
Date: 13 May 97 05:35:54 GMT
From: ahuja@wilde.oit.umass.edu (Manik Ahuja)
Subject: HELP NEEDED WITH GUESTBOOK!
Message-Id: <3377fdba.0@oit.umass.edu>
I am struggling with a guestbook that I am trying to put up and was
wondering if anyone out there could be of some help? Your help would be
greatly appreciated..
------------------------------
Date: 10 May 1997 14:52:55 -0400
From: Tom Fawcett <fawcett@nynexst.com>
To: Thomas Oelke <tpo9617@rit.edu>
Subject: Re: how do I get a binary representation of a number in a string
Message-Id: <8j207fb1mg.fsf@nynexst.com>
Thomas Oelke <tpo9617@rit.edu> writes:
> Here's what I want to have,
>
> $i = "12"; # or any number 0-15.
> $tmp = somefunc($i);
> print "$i in binary is $tmp\n";
>
> Then get for output:
> 1110
>
> (if $i = 3, it would return 0011, etc.)
>
> So the question is, how can I implement 'somefunc'?
> I've tried doing stuff w/ unpack, but that doesn't seem to be what I want.
Maybe you didn't try the right thing. This works:
unpack("B32", pack("i", $i));
You may have to strip off leading zeroes, but that's trivial in perl.
-Tom
------------------------------
Date: Sun, 11 May 1997 17:22:38 -0500
From: fl_aggie@hotmail.com (I R A Aggie)
Subject: Re: How Does Someone Copy a File in perl?
Message-Id: <fl_aggie-ya02408000R1105971722380001@news.fsu.edu>
In article <slrn5n777s.3hd.I-hate-cyber-promo@news.rediris.es>,
I-hate-cyber-promo@man.ac.uk wrote:
+ In comp.lang.perl.misc,
+ fl_aggie@hotmail.com wrote:
+ >[yadda yadda yadda]
+ Never seen that keyword before. Are you sure? :-)
Hey, if it is good enough for Dogbert...
James
--
Consulting Minister for Consultants, DNRC
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/perl/faq/idiots-guide.html>
------------------------------
Date: Sat, 10 May 1997 12:57:14 -0400
From: jordyn@bestweb.net (Jordyn A. Buchanan)
Subject: Re: How to do a "less" on a file.
Message-Id: <jordyn-ya02408000R1005971257140001@nntp.bestweb.net>
In article <5khel0$bu0$1@en1.engelschall.com>, sb@en.muc.de wrote:
> > johnliao@cs.buffalo.edu (John Liao) wrote:
>
> > > open (FILE, "hugefile")||die "cant open";
> > > while (<FILE>){
> > > print $_;
> > > }
> > > close FILE;
> > >
> > > Now if the "hugefile" is like 2 thousand lines long,
> > > it'll just scroll by the screen. Is there a way in perl
> > > to do a "less" or "more" on the output. I have try the
> > > following, but it didnt work.
> > >
> > > open (FILE, "hugefile")|| die "can't open";
> > > open (OUTPUT, "less |");
> > > while (<FILE>){
> > > print OUTPUT $_;
> > > }
> > > close FILE;
>
> Hello John Liao, ignore the following, he's telling you pretty
> confused stuff (see workin code below!):
Hrm? Please point out any of the following that is incorrect.
Note that I never said anywhere that it was *impossible* to get
the output of "hugefile" to go through perl and then through a
pager, just like less or more, I just said:
1. That the author's original approach, of taking input *from*
the pager, would not be effective.
and
2. Even if you could do it, it would be a waste of resources.
This is still true in the example you provide--if all you want
to do is page through a text file, there's no reason to get
perl in the middle.
> Jordyn A. Buchanan <jordyn@bestweb.net> wrote:
> > There are a couple of problems with the approach above:
> > 1. less only prints things out one page at a time when
> > it is printing directly to a terminal--if you redirect
> > its output (as you do above), it simply dumps all the
> > output. It's a bit much to expect the other end of the
> > pipe to send back "space" characters or whatever to
> > continue to the next "screen". (How big is a screen in
> > a pipe?) If you think carefully about what your program
> > is doing, it's printing everything less hands off to it,
> > and certainly not waiting for the user to press any keys.
>
> > 2. Even if your approach would work, it would be a waste of
> > resources. Essentially you're having perl open a file,
> > direct its conents into a pipe to less, taking the output
> > of less back into perl, and ultimately printing it there.
> > Why not just have less do it all?
>
> > I suppose the following would do what you want:
>
> > system("less hugefile");
>
> > But that makes your perl program pretty superfluous. You could also create
> > your own paging routine, but that's re-inventing the wheel.
>
> > Programs like less exist for the purpose of handling data from other
> > programs. The logical thing seems to be to not worry about how your data
> > looks, dump it to STDOUT and allow people to use less or more or whatever
> > they want to look at it.
>
> > |Jordyn A. Buchanan jordyn@bestweb.net|
> > |Senior System Administrator +1.914.271.4500|
> ^^^^^^^^^^^^^^^^^^^^^^^^^^^
>
> Shouldn't you know better? >;-)
>
> Here's some code that works under all circumstances:
> (it only pipes to "more" if STDOUT is connected to a terminal; otherwise,
> it simply prints to STDOUT)
>
> unless ((-t STDOUT) && (open(MORE, "| more")))
> {
> unless (open(MORE, ">-"))
> {
> die "can't write to STDOUT: $!\n";
> }
> }
> while ($whatever)
> {
> print MORE "$whateveryouwant\n";
> }
> close(MORE);
Incidentally, a nice piece of code. By far the best posted on this thread.
Jordyn
|---------------------------------------------------------------|
|Jordyn A. Buchanan jordyn@bestweb.net|
|Bestweb Corporation http://www.bestweb.net|
|Senior System Administrator +1.914.271.4500|
|---------------------------------------------------------------|
------------------------------
Date: Sat, 10 May 1997 18:10:46 -0400
From: "Rick" <rwatkins@crosslink.net>
Subject: I Have a Syntax Problem, Need Help!
Message-Id: <5l2rlh$3ej$6@kronos.crosslink.net>
I have what I think is a basic syntax problem that I just can't seem to see
because I looked at it too much. Can someone take a gander at this short
Perl Script that just has one subroutine? I keep getting errors and I
can't figure out why. I am using a book called, "CGI Primer Plus for
Windows" and this is a practical exercise. Anyway, here is the script:
#!/usr/local/bin/perl
# Chapter 3 example 4, Main Line Program with Subroutine Calls Made
# Main Program
# Print the required content-type HTTP header
print "Content-Type: text/html\n\n";
# Call the subroutine
&print_header_or_footer("header");
print "<P>This line is printed from the main.<P>";
# Call the same subroutine another time
&print_header_or_footer("footer");
exit 0
sub header_or_footer{
# Parameter was passed from outside and is now
# stored in Perl's special variable: @_
$what=@_;
# If we need the header, then this prints the header portion.
if ($what eq "header") {
print "<HTML>\n";
print "<HEAD>\n";
print "<TITLE>\n";
print "Chapter 3 Example 1\n";
print "</TITLE>\n";
print "</HEAD>\n";
print "<BODY>\n";
print "This line is printed from the subroutine print_htmlheader\n";
}
# We are supposed to print a footer
else {
print "<P>\n";
print "This line is printed from the subroutine print_htmlfooter\n";
print "</BODY>\n";
print "</HTML>\n";
}
}
------------------------------
Date: 10 May 1997 20:29:54 GMT
From: andrew@adaviel.isdn.ubc.ca (Andrew Daviel)
Subject: Linux SEGV, Perl4, inodes ...
Message-Id: <5l2ls2$1lg$1@nntp.ucs.ubc.ca>
I have Perl 4.0.1.8 under Linux 1.2.10 running a moderately large and
lengthy net-based app. Last week I changed the filesystem from
4096 bytes/inode to 1024 (I have a lot of small files). I started
to get a segmentation violation after running for a while.
Could there be a correlation ?
I had also made a trivial change in the script, but restored it (I think).
Since the running conditions depend on stuff out there on the net it's
impossible to duplicate them.
I think it's better with Perl5, but I'm not certain.
Andrew Daviel
Vancouver Webpages
------------------------------
Date: Sat, 10 May 1997 20:17:28 GMT
From: wilson@mail.sunflower.com (Jim Wilson)
Subject: Need Help!
Message-Id: <3385d728.45262777@news.sunflower.com>
PC-Help Online <URL:http://www.pchelponline.com/>
PC-Help Online recently has been adding resources for programmers and
we have encountered some problems with finding some of the best sites
and we could use your help. If you have a lot of quality links for
this programming language could you take a few minutes and add them to
PC-Help Online? It only takes a minute and it helps a lot of other
programmers. All additions to the site are added immediately to the
site, so others can get to them right away. You will find programming
in PC-Resources then Software.
We appreciate you taking the time to help us make PC-Help Online even
better!
--Jim Wilson
"The PC Information you need to get the answers you want"
http://www.pchelponline.com/
------------------------------
Date: 13 May 1997 01:19:01 -0500
From: les@MCS.COM (Leslie Mikesell)
Subject: Re: New draft of scripting white paper
Message-Id: <5l914l$kbj$1@Venus.mcs.net>
In article <3376A8FB.65F3@dis.org>, Cimarron Taylor <cimarron@dis.org> wrote:
>To put it another way, I've never heard anyone speak of extending the
>"programming paradigm" of /bin/sh when they create a new executable.
>Why should that terminology apply to Tcl?
That goes without saying. The whole concept of unix tool programming
is that any new tool automatically and intentionally includes all
the others. Of course this eventually becomes cumbersome enough
that for some purposes you need more integrated programs.
Les Mikesell
les@mcs.com
------------------------------
Date: Mon, 12 May 1997 16:17:05 -0700
From: Cimarron Taylor <cimarron@dis.org>
Subject: Re: New draft of scripting white paper
Message-Id: <3377A4F1.72C6@dis.org>
Ray Johnson wrote:
> This is one of the basic points John is trying to make in the scripting
> white paper. What you call "professional programers", however, John
> would call a systems programmer. The point of scripting - and other
> high level solutions - is that there will never be enough systems programmers
> to do all the work that's needed. Scripting and domain specific programming
> allow less sophisticated programmers take on more of the load.
Ok, perhaps if John went into more detail about systems
programming I'd be more satisified with his paper.
> : To put it another way, I've never heard anyone speak of extending the
> : "programming paradigm" of /bin/sh when they create a new executable.
> : Why should that terminology apply to Tcl?
>
> This show that you don't really know how the extensions mechanism in
> Tcl works (not that many Tcl users do either). Tcl is not /bin/sh
> and is much more flexable and extendable than /bin/sh or most any
> other programming language (except lisp and some others).
Oh come now, I wrote what was perhaps one of the earliest
(now defunct) object extensions to Tcl, and I had to add some
extra code to the Tcl core in order to do it. Eventually
the extension proved unmaintainable so I gave up on it.
If Tcl had a real meta-object protocol or some other form
of metadata mechanism I could have added my language
extension without modifying the core.
> For example, I've made a declaritive based extension language for
> an agent system based on Tcl. Several people have made OO versions
> of Tcl for thier needs. The key is that you can create new control
> structures very easily.
I'm not aware of your work in this area and am curious about
what your language semantics really are. I've seen lots
of papers about ways to get constraint propagation using
Tcl variable traces. I've also seen ways to do OO style
programming using tricks like redefining proc.
My claim is that sort of thing does not count as a true
declarative language or true support for OO programming
since this kind of shortcut doesn't leave you with any way
of reasoning about expressions to verify correct semantics
without resorting to running the system.
> So your comments beg the question. What defines domain-specific?
I began to touch on this above. The primitives provided
by a domain-specific language should have semantics which
closely represent the underlying domain. SQL is a example
of a domain-specific language where the domain is managing
data. Mathematica is a domain-specific language for
manipulating algebraic equations in symbolic form. There
are many others.
Note that I'm not saying you can't do data management or
symbolic processing in Tcl. What I am saying is that if
you want to do this in Tcl you will have to re-invent many
of the things SQL or Mathematica already has.
> I can think of many domain specific languages that I have seen that
> simply add new commands. You imply that that isn't enough. Why?
A domain specific language has a way of representing,
evaluating and reasoning about expressions which differs
enough from that of a general programming language.
Of course, one can always re-invent an entire expression
framework as a bunch of Tcl commands but I don't see what
advantage that gives you since the resulting system will
be hard to learn and use since you'll always have to be on
guard for weird interactions between the Tcl expression
mechanism and your domain-specific evaluation framework.
Cimarron Taylor
cimarron@dis.org
------------------------------
Date: Tue, 13 May 1997 07:37:34 +0200
From: Thorsten Mueller <thnlog@hotmail.com>
Subject: Re: oraperl on solaris 2.5/oracle 7.3
Message-Id: <3377FE1E.7519@x400.lhsystems.com>
Chi-Sharn Wu wrote:
>
> Hi:
>
> My project plans to move to solaris 2.5 and oracle 7.3 in the
> near future. Does any one have experience in building oraperl
> (perl 4) on such configuration? Thanks for any info.
>
> Chi-Sharn Wu
> swu@jolt.att.com
A few months ago we moved to Oracle 7.2.3 on HP-UX 9.0x and found that
perl (4.x / 5.x) doesn't work together with Oracle's SQL*Net V2 ...
As far as I know, Oracle 7.2 was the last Oracle version supporting
SQL*Net 1.
If anyone has a solution for it, I'd also be interested
Thorsten Mueller
thorsten.mueller@x400.lhsystems.com
100.181781@germany.net
------------------------------
Date: 10 May 1997 10:36:57 GMT
From: "Elmar H. Band" <media@telcel.net.ve>
Subject: Perl 5.003_07 and FrontPage 97
Message-Id: <01bc5d70$ee6136c0$0fc088d0@TELCEL.TELCEL.NET.VE>
Hi there,
I just installed Perl Version 5.003_07 on Win95 and tried to get it running
on FrontPage 97 as a local server. It doesn't work, I'm getting the da..
500 Server error all the time. I tried it on FolkWeb and it worked fine.
Is there anybody out there using Perl in conjunction with FrontPage 97?
Help!
Greetings from Venezuela,
Elmar.
------------------------------
Date: Fri, 09 May 1997 22:46:46 +0200
From: Arnold Huebsch <A.Huebsch@magnet.at>
Subject: perlscript installation problems
Message-Id: <33738D35.339F@magnet.at>
I try to get perlscript under active server pages on my NT box running.
Perl itself and scripts work alone unter Perl and PerlIS. Perlscript
works with the examples as long as I use the clientbased ones. The *.asp
files dont work I always get "HTTP/1.0 Invalid Application Name".
So far so good
so I checked in my registry the W3SVC stuff script maps and so on
.ASP points to asp.dll
.pl to PerlIIS.dll
I tried to play around with theese and pointed asp to PerlSE.dll but it
didnt help.
I think I have a very basig problem which I currently cant see. Active
Server Pages work wit VBscriupt and JavaScript programs but I4d like to
use perl which most of you will understand.
any ideas ?
Arnold
------------------------------
Date: 10 May 1997 12:30:55 -0700
From: Randal Schwartz <merlyn@stonehenge.com>
To: Chris Andrew <earl@bell.us>
Subject: Re: readdir -t ?
Message-Id: <8chggbp1jk.fsf@gadget.cscaper.com>
>>>>> "Chris" == Chris Andrew <earl@bell.us> writes:
Chris> How can I read the files of a directory *time-sorted* kind of the
Chris> Unix *ls -t* command. I want to do it in an easy way when doing
Chris> @files = readdir(DIR);
Chris> Is there a switch to 'readdir'?
Nope, but it's not hard to do.
@names = map "/original/path/$_", readdir DIR; # must get full names
@sorted_names = sort { -M $a <=> -M $b } @names; # descending age sort
Hmm. That will call -M "foo" a lot... probably better to use a
"Schwartzian Transform" (not my term, but yes, named after me):
@sorted_names =
map { $_->[0] }
sort { $a->[1] <=> $b->[1] }
map { [$_, -M] }
@names;
An explanation of that is in the Unix Review columns at
http://www.stonehenge.com/merlyn/UnixReview/.
print "Just another Perl hacker," # but not what the media calls "hacker!" :-)
## legal fund: $20,495.69 collected, $182,159.85 spent; just 478 more days
## before I go to *prison* for 90 days; email fund@stonehenge.com for details
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@ora.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
------------------------------
Date: Mon, 12 May 1997 10:57:00 GMT
From: aml@world.std.com (Andrew M. Langmead)
Subject: Re: Sorting by date with format MMDDYY
Message-Id: <EA2EF0.HBn@world.std.com>
"Jack L. Owens" <jlowens@ptconnect.infi.net> writes:
>I need to sort an array of filenames by date. Unfortunately they are in
>the format "aMMDDYY.zip". What would be the simplest way to do this
>without reinventing the wheel?
The simplest way of doing this without re-inventing the wheel is look
at some of the documentation already developed for perl.
the FAQ has a section: "How do I sort an array by (anything)?"
<http://www.perl.com/CPAN/doc/manual/html/pod/perlfaq4/How_do_I_sort_an_aray_by_anyth.html>
And there is a document "Far More Than Everything You Ever Wanted to
Know About Sorting" <http://www.perl.com/CPAN/doc/FMTEYEWTK/sorting>
In case you can't quite figure it out from either of those:
Split (probably with a regular expression or the unpack function) each
filename up into separate month, day, and year portions, keeping some
way of associating the date elements with the filename. Give sort a
custom sort function that can take some piece of data and get the
filename and its associated month, day, and year. Have it compare two
years, if years are equal months, if months are equal days. (A good
use for the <=> comparison operator and the logical or "||" operator.)
The values returned from sort will now be those keys, sorted in the
proper order. Take these and retrieve the associated filenames from
them.
# split month, day, and year from filename. Each @filename element has
# a parallel @date element
for $filename (@filenames) {
push @date, [ unpack 'xA2A2A2x*', $filename ];
}
# pass sort the indicies for the @filenames array. It will look up the
# corresponding date data, and sort accordingly. Return the indicies
# sorted which are used to retrieve their corresponding filenames
foreach $filename ( @filenames[ sort by_filedate 0 .. $#filenames ] ) {
print "$filename\n";
}
# sort by year first, if equal sort on month, if equal sort on
# day of month, if still equal, filenames are equal.
sub by_filedate {
$date[$a]->[2] <=> $date[$b]->[2] ||
$date[$a]->[1] <=> $date[$b]->[1] ||
$date[$a]->[0] <=> $date[$b]->[0];
}
--
Andrew Langmead
------------------------------
Date: 13 May 1997 06:23:38 GMT
From: "Simon Kitching" <simonk@telebusiness.co.nz>
Subject: Re: testing for non-existence in an associative array???
Message-Id: <01bc5f66$d0bcac60$cbe824ca@simonk>
You seem to have a couple of problems with your script here.
(A) an associative array value can hold ONLY ONE SCALAR (a reference is
also a scalar...)
$hashtable{$key} = $value; # valid, associates key with value
$hashtable{$key} = [$item1, $item2]; # valid, associates key with a
reference to anonymous list
$hashtable{$key} = $value1, $value2; # WRONG. Associates key with $value1,
completely ignores $value2.
If you don't understand the comment about the third example, read up on the
comma operator. You are NOT building
a list in this case, but performing two statements one after the other.
First statement is an assignment of a single scalar value to a hash
element, the second statement evaluates the expression $value2 and discards
the result.
(B) to test if a particular key exists in the associative array, use the
"exists" function.
example: if (exists($hashtable{$key})) ....
(C) almost equivalent to (B) is:
$var = $hashtable{$key};
if (defined($var))...
The only difference between (B) and (C) is if you have dont something like
this:
$hashtable{$key}=undef; # key exists, but lookup returns undef
Whether (B) or (C) is better depends on what you are trying to do..
Simon Kitching (simonk@telebusiness.co.nz)
----------------------------------------------
Marshall Pierce <piercem@col.hp.com> wrote in article
<5kstj1$6i1$1@nonews.col.hp.com>...
> I have an associative array: $TimeSpent{$Project} =
$WeeklyTotal,$DailyTotal
> If I search it for something, how can I tell if anything was found?
>
> ($SomeProjectsTotal,$SomeDailyTotal) = $TimeSpent{$SomeProject};
>
> if ($SomeProjectsTotal =~ <FOUND>)
> {
> do something
> }
> else
> {
> intitial setup of project
> }
>
> If I print $SomeProjectsTotal and nothing was found, nothing is printed
> but ($SomeProjectsTotal =~ /\d/) is positive
> ($SomeProjectsTotal !=~ /\0/) is positive
> ($SomeProjectsTotal > 0) is positve
> IOW, every test I try is a positive, despite the fact that NOTHING was
found!
>
>
> TIA
> --
> Marshall V Pierce /_ __ TIS - WWUSP Technology Team
> marshall_pierce@hp.com / //_/
> USA (719) 590-3461 /
http://hpweb.cs.itc.hp.com/wwusp/piercem/
>
------------------------------
Date: Mon, 12 May 1997 21:41:15 -0600
From: greg@nettrust.com
Subject: US-NY-LI Perl, SQL, Unix, HTML, Internet Dev
Message-Id: <863490538.31237@dejanews.com>
US-NY-LI Perl, SQL, Unix, HTML, Internet Dev
3-9 month project in Suffolk County Long Island New York
Web database applications. CGI experience required.
1-3 persons needed.
Good rates available, 50+ hour weeks
Email resume + rate requirements
-------------------==== Posted via Deja News ====-----------------------
http://www.dejanews.com/ Search, Read, Post to Usenet
------------------------------
Date: Mon, 12 May 1997 15:19:25 -0600
From: Steve Fling <sfling@pcisys.net>
Subject: Using variable to name an array????
Message-Id: <3377895D.31D9@pcisys.net>
If it is possible, what is the syntax to use a variable to name an
array? For example, this is what I am inclined to do: @"$name"
but this does not seem to work.
TIA,
Steve Fling (sfling@sequent.com)
Senior Intranet Engineer
Sequent Computer Systems, Inc.
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
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.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
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 V8 Issue 464
*************************************
