[25041] in Perl-Users-Digest
Perl-Users Digest, Issue: 7291 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Oct 23 11:05:48 2004
Date: Sat, 23 Oct 2004 08:05:08 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sat, 23 Oct 2004 Volume: 10 Number: 7291
Today's topics:
[ANN] Archive::Zip 1.14 released <ned@bike-nomad.com>
Re: deciphering emails in PERL <tadmc@augustmail.com>
Re: Hard regexp problem <pinyaj@rpi.edu>
Re: Hard regexp problem <rwxr-xr-x@gmx.de>
Re: Help on Perl Split Function <Joe.Smith@inwap.com>
Re: How to I get an user email address, if I know the d <Joe.Smith@inwap.com>
Re: list vs array <dha@panix.com>
Re: list vs array <nospam@nospam.com>
Re: list vs array <nospam@nospam.com>
Re: list vs array <spamtrap@dot-app.org>
Re: list vs array <usa1@llenroc.ude.invalid>
Re: Net::POP3 Install <nospam@nospam.com>
Re: Net::POP3 Install <spamtrap@dot-app.org>
Re: Net::POP3 Install <matthew.garrish@sympatico.ca>
Re: printing to web browser <lwt0301@bellsouth.net>
Re: printing to web browser <uri@stemsystems.com>
Re: regex to clean path <parv_@yahooWhereElse.com>
Re: using range gives warning <uri@stemsystems.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 22 Oct 2004 22:03:35 GMT
From: Ned Konz <ned@bike-nomad.com>
Subject: [ANN] Archive::Zip 1.14 released
Message-Id: <I61Crr.8o5@zorch.sf-bay.org>
Archive::Zip v1.14 has been released on Oct 21 2004.
This version was created to deal with viruses that modify central directory
records.
Changes since v1.13:
- Set uncompressed size to compressed size on COMPRESSION_STORED to avoid
problems with certain intentionally modified zip files.
Notes:
- Some testers on older (Perl 5.500503) systems have reported
'uninitialized
value' messages in t/testUpdate.t. Apparently, updating to version 1.25
of
the Test module fixes this warning.
>From the README:
The Archive::Zip module allows a Perl program to create, manipulate,
read, and write Zip archive files.
Zip archives can be created, or you can read from existing zip files
or strings (using IO::Scalar). Once created, they can be written to
files, streams, or strings.
Members can be added, removed, extracted, replaced, rearranged, and
enumerated. They can also be renamed or have their dates, comments, or
other attributes queried or modified. Their data can be compressed or
uncompressed as needed. Members can be created from members in existing
Zip files, or from existing directories, files, or strings.
Directory trees can be added or extracted simply using special tree
routines.
This module uses the Compress::Zlib library to read and write the
compressed streams inside the files. Note that versions of Compress::Zlib
prior to 1.06 truncate data and should not be used.
Compress::Zlib prior to 1.08 caused crashes on some Windows systems.
Examples and helper libraries are given to show how:
* zip files can be read and written to strings
* zip files can be written in chunks to arbitrary functions
CHANGES SINCE v1.00:
1.14 Thu Oct 21 08:13:50 PDT 2004
- Set uncompressed size to compressed size on COMPRESSION_STORED to avoid
problems with certain intentionally modified zip files
1.13 23 August 2004
- Fixed tempfile unlink/rename bug in Win32
- Avoid taint complaints in tree operations
- Cures problems with t/testex test on older Perl versions
1.12 8 Jul 2004 19:11:53 / 1.11 (removed) 23 Aug 2004 12:56:25
- Use File::Temp for more secure tempfile handling
(thanks to Alexey Tourbin of the ALT Linux Team)
- Fix to avoid endless looping on certain corrupt zip files
(thanks to Julian Field)
- Handling of zip files with data descriptors (like some Java JAR files)
- Handle unicode strings as input to Archive::Zip::Member::contents(),
Archive::Zip::Member::contents(), and
Archive::Zip::Archive::zipfileComment()
(thanks to Geoffrey D. Bennett)
1.10 Thu Mar 25 06:24:17 PST 2004
- Fixed documentation of setErrorHandler()
- Fixed link to Japanese translation of docs
- Added Compress::Zlib Bufsize patch from Yeasah Pell that was supposed to
have been added in 1.02
- Fixed problems with backup filenames for zips with no extension
- Fixed problems with undef volume names in _asLocalName()
1.09 Wed Nov 26 17:43:49 PST 2003
- Fixed handling of inserted garbage (as from viruses)
- Always check for local header signatures before using them
- Added updateMember() and updateTree() functions
- Added examples/mailZip.pl
- Added examples/updateTree.pl
- Fixed some potential but unreported bugs with function parameters like
'0'
- Removed stray warn() call
- Caught undef second arg to replaceMember()
1.08 Tue Oct 21 07:01:29 PDT 2003
- test noise fix from Michael Schwern (ticket 4174)
- FAQ NAME fix from Michael Schwern (ticket 4175)
1.07 Mon Oct 20 06:48:41 PDT 2003
- Added file attribute code by Maurice Aubrey
- Added FAQ about RedHat 9 build errors
- Added check for empty filenames
1.06 Thu Jul 17 11:06:18 PDT 2003
- Fixed seek use with IO::Scalar and IO::String
- Fixed use of binmode with pseudo-file handles
- Removed qr{} form for older Perl versions
- Changed rel2abs logic in _asLocalName() if there is a volume
- Fixed errors with making directories in extractMember() when none
provided
- Return AZ_OK in extractMemberWithoutPaths() if member is a directory
- Fixed problem in extractTree with blank directory becoming "." prefix
- Added examples/writeScalar2.pl to show how to use IO::String as
destination of Zip write
- Edited docs and FAQ to recommend against using absolute path names in
zip files.
1.05 Wed Sep 11 12:31:20 PDT 2002
- fixed untaint from 1.04
1.04 Wed Sep 11 07:22:04 PDT 2002
- added untaint of lastModFileDateTime
1.03 Mon Sep 2 20:42:43 PDT 2002
- Removed dependency on IO::Scalar
- Set required version of File::Spec to 0.8
- Removed tests of examples that needed IO::Scalar
- Added binmode() call to read/writeScalar examples
- Fixed addTree() for 5.005 compatibility (still untested with 5.004)
- Fixed mkdir() calls for 5.005
- Clarified documentation of tree operations
1.02 Fri Aug 23 17:07:22 PDT 2002
- Many changes for cross-platform use (use File::Spec everywhere)
- Separated POD from Perl
- Moved Archive::Zip::Tree contents into Archive::Zip
A::Z::Tree is now deprecated and will warn with -w
- Reorganized docs
- Added FAQ
- Added chunkSize() call to report current chunk size
and added C::Z BufSize patch from Yeasah Pell.
- Added fileName() to report last read zip file name
- Added capability to prepend data, like for SFX files
- Added examples/selfex.pl for self-extracting archives creation
- Added examples/zipcheck.pl for validity testing
- Made extractToFileNamed() set access/modification times
- Added t/testTree.t to test A::Z::Tree
- Fix/speed up memberNamed()
- Added Archive::Zip::MemberRead by Sreeji K. Das
- Added tempFile(), tempName()
- Added overwrite() and overwriteAs() to allow read/modify/write of zip
- added examples/updateZip.pl to show how to read/modify/write
1.01 Tue Apr 30 10:34:44 PDT 2002
- Changed mkpath call for directories to work with BSD/OS
- Changed tests to work with BSD/OS
COPYRIGHT:
Copyright (c) 2000-2004 Ned Konz. All rights reserved. This program is free
software; you can redistribute it and/or modify it under the same terms
as Perl itself.
AVAILABILITY:
>From CPAN, in directory
http://www.cpan.org/modules/by-authors/id/N/NE/NEDKONZ/
or
ftp://ftp.cpan.org/pub/CPAN/modules/by-authors/id/N/NE/NEDKONZ/
as Archive-Zip-1.14.tar.gz
------------------------------
Date: Sat, 23 Oct 2004 07:57:29 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: deciphering emails in PERL
Message-Id: <slrncnkl9p.d0f.tadmc@magna.augustmail.com>
Michele Dondi <bik.mido@tiscalinet.it> wrote:
> On Fri, 22 Oct 2004 07:39:22 -0500, Tad McClellan
><tadmc@augustmail.com> wrote:
>
><OT>
>>>>i have to think, with the vast exapnse of lib. i see out there for PERL,
>>>>someone has written something? no?
>>
>>> But what is an "exapnse" supposed to be?
>>> Sorry, I'm not a native English speaker...
>>
>>I expect he meant "expanse".
>
> Of course I was kind of joking... however... would *that* be the/a
> correct term, anyway?
Yes, "vast expanse" is a common phrase in English, meaning
loosely "a whole lot".
></OT>
Right.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Sat, 23 Oct 2004 10:24:39 -0400
From: Jeff 'japhy' Pinyan <pinyaj@rpi.edu>
Subject: Re: Hard regexp problem
Message-Id: <Pine.SOL.3.96.1041023102309.13213B-100000@vcmr-86.server.rpi.edu>
On 22 Oct 2004, Aaron Sherman wrote:
>I was stumped for a while today, when I ran into a regular expression
>problem. Now, I'm a pretty good regexp hacker, but this problem was so
>constrained and seemed at first glance to be so wrong for a regexp
>that I didn't think it could be done. However, in specifying it to a
>friend, I realized that it could.
>
>I'm curious to see if there's a better solution.
>
>The problem is this: You have a function call in a library that takes
>a regexp, anchors it on both ends by adding "^" and "$" to the
>beginning end, and then applies that to an input string.
>
> sub foo {
> my $re = shift;
> my $in = <STDIN>;
> die "'$in' is bad" unless $in =~ /^$re$/;
> }
>
>It exits with an error if the string does not match the regexp. I
>wanted to accept strings that did NOT contain a particular substring.
>Normally, I would have written:
>
> !/xyz/
>
>But a) my regexp is going to have to match the whole line, which the
>above does not, and b) I can't tell the function to negate the regexp.
So make your regex consist of a negative look-ahead:
(?!.*xyz).*
When that gets put into your program, it'll be:
/^(?!.*xyz).*$/
which says "at the beginning of the string, if we CAN'T match '.*xyz',
then match .* and then the end of the string" which, as long as there
aren't embedded newlines, will work just fine.
--
Jeff "japhy" Pinyan % How can we ever be the sold short or
RPI Acacia Brother #734 % the cheated, we who for every service
Senior Dean, Fall 2004 % have long ago been overpaid?
RPI Corporation Secretary %
http://japhy.perlmonk.org/ % -- Meister Eckhart
------------------------------
Date: 23 Oct 2004 15:01:26 GMT
From: Lukas Mai <rwxr-xr-x@gmx.de>
Subject: Re: Hard regexp problem
Message-Id: <cldro6$g1i$2@wsc10.lrz-muenchen.de>
Aaron Sherman schrob:
[...]
> The problem is this: You have a function call in a library that takes
> a regexp, anchors it on both ends by adding "^" and "$" to the
> beginning end, and then applies that to an input string.
> sub foo {
> my $re = shift;
> my $in = <STDIN>;
> die "'$in' is bad" unless $in =~ /^$re$/;
> }
Note that this doesn't work with foo('this|that'); you need /^(?:$re)$/.
HTH, Lukas
--
print${;eval{sub{die\"Just another $_[0] hacker, "}->(Perl::)}||$@}
------------------------------
Date: Sat, 23 Oct 2004 11:05:51 GMT
From: Joe Smith <Joe.Smith@inwap.com>
Subject: Re: Help on Perl Split Function
Message-Id: <jWqed.293262$MQ5.95978@attbi_s52>
Vishal wrote:
> That is: the split function should not search in the Pattern which are
> present in the quotes ("").
You should be using a module, not split(), for parsing CSV data
(Comma Separated Values).
If you don't recognize the significance of "perldoc -q inside", then
go to http://www.perldoc.com/perl5.8.4/pod/perlfaq4.html and look
for "How can I split".
-Joe
------------------------------
Date: Sat, 23 Oct 2004 10:49:34 GMT
From: Joe Smith <Joe.Smith@inwap.com>
Subject: Re: How to I get an user email address, if I know the domain/username
Message-Id: <2Hqed.235042$wV.36303@attbi_s54>
Mav wrote:
>>> Using Perl, Windows, if I know the person domain name(or the whole
>>>user domain) and userid, like (google/foo). is that a way to return
>>>that person the email address progrom? I am on the same domain.
>
> I want to write a perl script to figure out the email address.
I'm in the NT domain as "\\camero\jms" but my e-mail address is
"joe.smith@inwap.com". The latter is not obviously related to the
former without doing an LDAP query.
http://search.cpan.org/~gbarr/perl-ldap-0.3202/lib/Net/LDAP.pod
-Joe
------------------------------
Date: Fri, 22 Oct 2004 22:45:36 +0000 (UTC)
From: "David H. Adler" <dha@panix.com>
Subject: Re: list vs array
Message-Id: <slrncnj3cg.a20.dha@panix2.panix.com>
On 2004-10-22, daniel kaplan <nospam@nospam.com> wrote:
> thanks!
For what??
You really need to start providing some context in your posts...
dha
--
David H. Adler - <dha@panix.com> - http://www.panix.com/~dha/
An aside, consider the idea of reality as a superposition of all
possible belief systems. If this is the case ... why can't we worship
them all in CONSTANT TIME! ;) - Mark Rogaski
------------------------------
Date: Sat, 23 Oct 2004 10:13:46 -0400
From: "daniel kaplan" <nospam@nospam.com>
Subject: Re: list vs array
Message-Id: <1098540859.109311@nntp.acecape.com>
thanks for you help and kind words araon...
what i have so far:
beginning perl -simon cozens
& SAMS teach yourself perl in 24 hours...
i have been running everything remotely on a shared server, so i have NO
command line capabilities...and unlike cozens, i believe debuggers are
essential tools not just in finding bugs quicker. as well i think they are
actual tools in learning
so as of now, i am doing what i can to install perl (activestate 5.6, but if
you would like to recommend a better one, please do) on my machine and learn
how to use the debugger...one thing i'll give windows, i don't miss command
lines! i prefer the VC's IDE based debugger....it makes it all such a joy!
oh well, can't always get what you want.
daniel
------------------------------
Date: Sat, 23 Oct 2004 10:17:19 -0400
From: "daniel kaplan" <nospam@nospam.com>
Subject: Re: list vs array
Message-Id: <1098541072.71487@nntp.acecape.com>
? For what??
>
> You really need to start providing some context in your posts...
>
> dha
was thanking jim for his advice....am i the only one that looks at the order
of the threading?
and some advice mr. david.
remove your email, unless you have some super serious spaminator program, in
which case, please share...
cause if you don't ...you'l be "YORKed" up and "PREPed" for lot's of spam
------------------------------
Date: Sat, 23 Oct 2004 10:44:22 -0400
From: Sherm Pendley <spamtrap@dot-app.org>
Subject: Re: list vs array
Message-Id: <Wa6dnbsMP_za8-fcRVn-jA@adelphia.com>
daniel kaplan wrote:
> & SAMS teach yourself perl in 24 hours...
Meh. I have yet to see *one* of those "Teach yourself in 24 hour/7
days/30 days/whatever" books that was worth using for more than a Ramen
lid-weight. I haven't read this one in particular, so I'm prepared to
accept that it might be the exception to the rule - but I highly doubt it.
The canonical works are "Learning Perl" as an introduction, "Learning
Perl Objects, References and Modules" as a followup, and "Programming
Perl" as a reference.
> i have been running everything remotely on a shared server, so i have NO
> command line capabilities
You're using Windows, right? As far as I know, a "DOS box" is still
available. It's not worth very much, but it's plenty capable of running
the "perldoc" tool that's so often mentioned here.
> so as of now, i am doing what i can to install perl (activestate 5.6, but if
> you would like to recommend a better one, please do)
It depends on what's on your server. If your server is stuck at 5.6 and
you can't update it, then mirroring that on your workstation is a pretty
good idea.
But unless you have a compelling reason to use the older version, I'd
suggest sticking with ActiveState, but using their 5.8 package rather
than the older 5.6.
> lines! i prefer the VC's IDE based debugger....it makes it all such a joy!
> oh well, can't always get what you want.
Not always - but in this case you can come pretty close. Have a look at
ActiveState's "Visual Perl" - I haven't used it, but I've heard that it
integrates with Visual Studio pretty well.
sherm--
--
Cocoa programming in Perl: http://camelbones.sourceforge.net
Hire me! My resume: http://www.dot-app.org
------------------------------
Date: 23 Oct 2004 14:53:10 GMT
From: "A. Sinan Unur" <usa1@llenroc.ude.invalid>
Subject: Re: list vs array
Message-Id: <Xns958B6EBD3B99Casu1cornelledu@132.236.56.8>
"daniel kaplan" <nospam@nospam.com> wrote in
news:1098541072.71487@nntp.acecape.com:
> ? For what??
>>
>> You really need to start providing some context in your posts...
>>
>> dha
>
> was thanking jim for his advice....am i the only one that looks at the
> order of the threading?
No, but you _are_ indeed the only one who is not familiar with how UseNet
works.
http://homepage.ntlworld.com/g.mccaughan/g/remarks/uquote.html
Sinan.
------------------------------
Date: Sat, 23 Oct 2004 10:07:24 -0400
From: "daniel kaplan" <nospam@nospam.com>
Subject: Re: Net::POP3 Install
Message-Id: <1098540477.73998@nntp.acecape.com>
mind helping me out a little more?
> perldoc -q "which modules are installed"
> Although I'll freely admit that figuring out which magic words you need
> to use to find a given question can be tough... For that reason (and
you said it! on "installed" alone it has nothing
> perl -MModule::Name -e1
not sure of the syntax here, and have tried multiple variations....
cant even seem to get help on e1!
thanks ahead
------------------------------
Date: Sat, 23 Oct 2004 10:54:10 -0400
From: Sherm Pendley <spamtrap@dot-app.org>
Subject: Re: Net::POP3 Install
Message-Id: <g8WdnbiYdsUP7efcRVn-qQ@adelphia.com>
daniel kaplan wrote:
>>perl -MModule::Name -e1
>
>
> not sure of the syntax here, and have tried multiple variations....
Have a look at "perldoc perlrun" for all of the available switches.
Briefly, -M is used to load a module - as used above, it corresponds to
"use Module::Name;" in code. Obviously you'll want to use the name of
the module you're checking for instead of Module::Name.
The -e is used to pass Perl code to evaluate. "1" is a *very* short Perl
program that does nothing but return 1.
Basically, if you have the module nothing obvious will happen with the
above. It will load the module and then exit. But if you *don't* have
the module, it will bail out with an error.
sherm--
--
Cocoa programming in Perl: http://camelbones.sourceforge.net
Hire me! My resume: http://www.dot-app.org
------------------------------
Date: Sat, 23 Oct 2004 10:46:08 -0400
From: "Matt Garrish" <matthew.garrish@sympatico.ca>
Subject: Re: Net::POP3 Install
Message-Id: <L8ued.62023$JG5.1128145@news20.bellglobal.com>
"daniel kaplan" <nospam@nospam.com> wrote in message
news:1098540477.73998@nntp.acecape.com...
>
> not sure of the syntax here, and have tried multiple variations....
>
> cant even seem to get help on e1!
>
If you keep expecting to get spoon-fed answers, you're going to find that
fewer and fewer people respond. What's so hard to figure out here? -e is
obviously a command line switch (unless you'd care to explain what you think
it is?), so go to the documentation on running perl from the command line
(i.e., perlrun!!!). And 1 is the simplest program you can write if all you
want to check is whether the module can be loaded. Voila!
Matt
------------------------------
Date: Sat, 23 Oct 2004 09:32:07 -0400
From: Laura <lwt0301@bellsouth.net>
Subject: Re: printing to web browser
Message-Id: <10nkngsstiocv83@news.supernews.com>
Jon Ericson wrote:
>
> P.S. I sense a "script versus program[..]
A script is interpreted and a program is compiled. I know you can in Perl
and some other scripting languages turn a script into a program, which
makes it more like a real programming language, like C++ or Java. Perl is
a scripting tool written in C so C programmers can have the conveniences of
languages like C++ or Visual Basic without having to leave their native
environment.
lwt
------------------------------
Date: Sat, 23 Oct 2004 13:46:22 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: printing to web browser
Message-Id: <x7r7npim5p.fsf@mail.sysarch.com>
>>>>> "L" == Laura <lwt0301@bellsouth.net> writes:
L> A script is interpreted and a program is compiled. I know you can
L> in Perl and some other scripting languages turn a script into a
L> program, which makes it more like a real programming language, like
L> C++ or Java. Perl is a scripting tool written in C so C
L> programmers can have the conveniences of languages like C++ or
L> Visual Basic without having to leave their native environment.
nonsense. balderdash. gobbledygook.
pick one.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Sat, 23 Oct 2004 09:51:15 -0500
From: parv <parv_@yahooWhereElse.com>
Subject: Re: regex to clean path
Message-Id: <slrncnks3s.2m56.parv_@localhost.holy.cow>
in message <slrncnhriu.a69.tadmc@magna.augustmail.com>,
wrote Tad McClellan ...
> parv <parv_@yahooWhereElse.com> wrote:
>
>> Somebody tell me this: Is there a guarantee that grep() will always
>> give the filtered output in the order in which input was received?
>
> No.
>
> grep() is guaranteed to give the filtered output in the order in which
> the original list was provided though.
Ok then; works for me.
> ie. the "list" may not be "input".
You pedantic you! I admit i was not using correct terminology.
>>> delete $hash->{$_} unless -d $_ && -x $_;
>
>>> But then C<$_> is not necessary and can be omitted
>>
>> Thanks for the reminder about '_';
>
> The reminder was about $_, not about _, they are not the same
> thing .
Above could have been just as well for some $key ...
delete $hash->{$key} unless -d $key && -x $key;
...and i will still miss using '_' on the first writing.
See, i do not remember to use '_' myself. When i see it being used
elsewhere or somebody else brings it to my attention, i go "of course,
i forgot again", much like in this case;
> The above will execute faster if you *do* use _ :
>
> delete $hash->{$_} unless -d $_ && -x _;
I understood from Michele's post what you have stated above; tried
to convey that in my reply but obviously failed.
- parv
--
As nice it is to receive personal mail, too much sweetness causes
tooth decay. Unless you have burning desire to contact me, do not do
away w/ WhereElse in the address for private communication.
------------------------------
Date: Sat, 23 Oct 2004 13:36:44 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: using range gives warning
Message-Id: <x73c05k167.fsf@mail.sysarch.com>
>>>>> "BM" == Brian McCauley <nobull@mail.com> writes:
BM> David K. Wall wrote:
>> This simply won't do, Paul. Haven't you learned anything here?
>> You're supposed to flame Brian for being rude to you and demand that
>> he parrot the documentation to you rather than reading it for
>> yourself.
BM> And now I am going to mess things up further by apologising that
BM> my response was not clearly enough tounge-in-cheek - it really
BM> could have done with a few smilies. I didn't really think that
BM> Paul hadn't RTFM.
oh, he did rtfm. the maroon didn't read his own code properly! (BIG :)
and i agree with everything david said about him too!
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
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: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
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 V10 Issue 7291
***************************************