[29709] in Perl-Users-Digest
Perl-Users Digest, Issue: 953 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Oct 19 09:09:42 2007
Date: Fri, 19 Oct 2007 06:09:09 -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 Fri, 19 Oct 2007 Volume: 11 Number: 953
Today's topics:
Re: Expansion of variable in foreach <tadmc@seesig.invalid>
Re: LWP problems with authenticating proxy <tadmc@seesig.invalid>
Re: LWP problems with authenticating proxy <mritty@gmail.com>
Re: perl standard <abigail@abigail.be>
Re: perl standard <mritty@gmail.com>
Re: perl standard <josef.moellers@fujitsu-siemens.com>
Re: perl standard <jo@durchholz.org>
Re: perl standard <bik.mido@tiscalinet.it>
Re: perl standard <bik.mido@tiscalinet.it>
Re: perl standard <bik.mido@tiscalinet.it>
Re: perl standard <bik.mido@tiscalinet.it>
Re: perl standard <mritty@gmail.com>
Re: please help optimize sub QoS@domain.invalid
Re: please help optimize sub <bik.mido@tiscalinet.it>
Re: please help optimize sub <bik.mido@tiscalinet.it>
Re: polymorphic regex -- encoding issue <dale.gerdemann@googlemail.com>
Re: Regular expression to match only strings NOT contai <rad@nospam.com>
Re: Regular expression to match only strings NOT contai <bik.mido@tiscalinet.it>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 19 Oct 2007 06:01:03 -0500
From: Tad McClellan <tadmc@seesig.invalid>
Subject: Re: Expansion of variable in foreach
Message-Id: <slrnfhh3jf.f70.tadmc@tadmc30.sbcglobal.net>
Samik R. <samik@frKKshKll.org> wrote:
> Is there something wrong in my syntax?
If your program executes, then there is nothing wrong with your syntax.
If your program does not make the output that you expect, then
there is something wrong with your *semantics*.
--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"
------------------------------
Date: Fri, 19 Oct 2007 06:05:58 -0500
From: Tad McClellan <tadmc@seesig.invalid>
Subject: Re: LWP problems with authenticating proxy
Message-Id: <slrnfhh3sm.f70.tadmc@tadmc30.sbcglobal.net>
Dan Rawson <drawson1.take.this.out@earthlink.dot.net> wrote:
> We have a proxy server which requires a user name and password. I'm
> attempting to use LWP::Simple
What you are trying to do goes beyond "simple", so you will need
to use a more full-featured module instead.
> I've looked through the LWP documentation, but I don't see how to set the
> proxy user/password :-((
Search for "credentials" in
perldoc LWP::UserAgent
--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"
------------------------------
Date: Fri, 19 Oct 2007 06:02:08 -0700
From: Paul Lalli <mritty@gmail.com>
Subject: Re: LWP problems with authenticating proxy
Message-Id: <1192798928.259713.233130@z24g2000prh.googlegroups.com>
On Oct 19, 7:05 am, Tad McClellan <ta...@seesig.invalid> wrote:
> Dan Rawson <drawson1.take.this....@earthlink.dot.net> wrote:
> > We have a proxy server which requires a user name and password. I'm
> > attempting to use LWP::Simple
>
> What you are trying to do goes beyond "simple", so you will need
> to use a more full-featured module instead.
No he won't. LWP::Simple initializes its underlying User Agent by
calling $ua->env_proxy(). LWP::UserAgent's documentation shows that
the env_proxy() method looks for the $http_proxy environment variable.
Just set http_proxy before loading up LWP::Simple, and you'll be fine.
Paul Lalli
------------------------------
Date: 19 Oct 2007 10:30:11 GMT
From: Abigail <abigail@abigail.be>
Subject: Re: perl standard
Message-Id: <slrnfhh1pi.ds1.abigail@alexandra.abigail.be>
_
Joachim Durchholz (jo@durchholz.org) wrote on VCLXII September MCMXCIII
in <URL:news:ff9upn$tr1$2@online.de>:
:} A standard serves to make the implementations converge on a common
:} semantics. Since Perl is a single-implementation language, there is no
:} need for a standard.
Well, there's more to be said about the merits of a standard than
just dismissing it with "there's just one implementation".
Read the O'Reilly interview [1] with Larry Rosler (a former clpm poster)
for instance. I don't necessarely agree with his conclusion, but he
makes some interesting arguments.
[1] http://www.perl.com/pub/a/2000/06/rosler.html
Abigail
--
split // => '"';
${"@_"} = "/"; split // => eval join "+" => 1 .. 7;
*{"@_"} = sub {foreach (sort keys %_) {print "$_ $_{$_} "}};
%{"@_"} = %_ = (Just => another => Perl => Hacker); &{%{%_}};
------------------------------
Date: Fri, 19 Oct 2007 03:42:50 -0700
From: Paul Lalli <mritty@gmail.com>
Subject: Re: perl standard
Message-Id: <1192790570.932461.72480@e34g2000pro.googlegroups.com>
On Oct 19, 5:13 am, "Wade Ward" <zaxf...@invalid.net> wrote:
> They is ISO. I would have a hard time believing that the entire
> body of international standards chose to overlook perl,
> particularly when I've already heard the document described.
>
> perldoc perlhack is a %100 wrong answer.
The levels of stupidity you exhibited in this response is truly
shocking.
Please, go find someone who will sell you an "ISO Certified Standard"
Perl for $250. I'm sure you'll be very happy with your purchase.
Then let us know if there's anything else you'd like to purchase. I
hear there's a bridge for sale in Brooklyn.
Paul Lalli
------------------------------
Date: Fri, 19 Oct 2007 12:49:54 +0200
From: Josef Moellers <josef.moellers@fujitsu-siemens.com>
Subject: Re: perl standard
Message-Id: <ffa24s$cnv$2@nntp.fujitsu-siemens.com>
Abigail wrote:
> _
> Wade Ward (zaxfuuq@invalid.net) wrote on VCLXII September MCMXCIII in
> <URL:news:eo2dnaMhQteF-oXanZ2dnUVZ_ternZ2d@comcast.com>:
> ## =20
> ## =20
> ## "Paul Lalli" <mritty@gmail.com> wrote in message=20
> ## news:1192754482.690169.74570@z24g2000prh.googlegroups.com...
> ## > On Oct 18, 7:24 pm, "Wade Ward" <zaxf...@invalid.net> wrote:
> ## >> I'm far enough along in Perl now that I'd like to lay eyes on
> ## >> the Standard.
> ## >>
> ## >> Usually they have the full standard available for $250
> ## >
> ## > Who is this "they" of whom you speak? There is no such entity.
> ## > There's Larry. What he says Perl should do is as close to an offi=
cial
> ## > "standard" as you're ever going to find. (See also: "The Rules",
> ## > `perldoc perlhack`)
> ## They is ISO. I would have a hard time believing that the entire bo=
dy of=20
> ## international standards chose to overlook perl, particularly when I=
've=20
> ## already heard the document described.
>=20
> You think it's more believable that a well known standards body goes of=
f
> to standardize Perl, and not tell anyone involved with Perl development=
> about it?
>=20
> What do you think ISO is? A bunch of people picking a random subject=20
> every Monday morning that they will standardize this week?
Cool down.
I guess what Wade meant was that in other realms, "they" (I'll have to=20
be careful, as they are after me ;-) charge you muchas dollars for a=20
copy of some standard, e.g. ISO will charge you, if you'd like to have=20
some of their standards for reference. IIRC that's they way they make=20
some of their money.
--=20
These are my personal views and not those of Fujitsu Siemens Computers!
Josef M=F6llers (Pinguinpfleger bei FSC)
If failure had no penalty success would not be a prize (T. Pratchett)
Company Details: http://www.fujitsu-siemens.com/imprint.html
------------------------------
Date: Fri, 19 Oct 2007 12:54:20 +0200
From: Joachim Durchholz <jo@durchholz.org>
Subject: Re: perl standard
Message-Id: <ffa2cl$33s$1@online.de>
Abigail schrieb:
> _
> I don't necessarely agree with his conclusion, but he
> makes some interesting arguments.
>
> [1] http://www.perl.com/pub/a/2000/06/rosler.html
I see just one argument: that large bodies (corporations, governments)
won't use a language that's not standardized.
Did I overlook something?
Regards,
Jo
------------------------------
Date: Fri, 19 Oct 2007 12:54:15 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: perl standard
Message-Id: <m43hh3l4k3lsmem1dbdck885cnvl0gc72g@4ax.com>
On Thu, 18 Oct 2007 17:00:47 -0700, "benkasminbullock@gmail.com"
<benkasminbullock@gmail.com> wrote:
>Logically speaking, if you accept that Perl is defined by its
>implementation, then you also accept that there is no such thing as a
>bug in Perl. If Perl does something crazy or unexpected, then since
>Perl is "defined by its implementation", the bizarre behaviour is not
>a bug, it is the correct behaviour of Perl, at least as far as the
>language is "defined by its implementation". Also you have to accept
>that the documentation is wrong if it says something different from
>what Perl actually does. So if Perl exhibits some bug then the
>documentation should be considered incorrect, not Perl.
Strictly speaking I suspect that you'd be right, but with
"implementation" I meant everything that comes with an implemented
Perl, the documentation being part of that.
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Fri, 19 Oct 2007 13:01:10 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: perl standard
Message-Id: <t73hh39viu077g7u9fame3f7ctc6r7a08l@4ax.com>
On Thu, 18 Oct 2007 17:41:22 -0700, Paul Lalli <mritty@gmail.com>
wrote:
>Who is this "they" of whom you speak? There is no such entity.
>There's Larry. What he says Perl should do is as close to an official
>"standard" as you're ever going to find. (See also: "The Rules",
>`perldoc perlhack`)
And following him in order of importance, the other @Larrys. :)
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Fri, 19 Oct 2007 13:04:02 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: perl standard
Message-Id: <gk3hh3deiqckemuur8lg3k88ag7g982tis@4ax.com>
On Fri, 19 Oct 2007 02:13:17 -0700, "Wade Ward" <zaxfuuq@invalid.net>
wrote:
>They is ISO. I would have a hard time believing that the entire body of
>international standards chose to overlook perl, particularly when I've
perldoc -q ansi
: Found in C:\Programmi\Perl\lib\pod\perlfaq2.pod
: Is there an ISO or ANSI certified version of Perl?
: Certainly not. Larry expects that he'll be certified before Perl is.
>already heard the document described.
"Heard"? Somebody told me about "chemical trails", I've already heard
about them. Thus it must be true...
>perldoc perlhack is a %100 wrong answer.
Huh?!? What's wrong with it?
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Fri, 19 Oct 2007 13:20:29 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: perl standard
Message-Id: <5m4hh39aij0ub0g7jf0smb5c9hpmka8dbr@4ax.com>
On Fri, 19 Oct 2007 03:42:50 -0700, Paul Lalli <mritty@gmail.com>
wrote:
>Then let us know if there's anything else you'd like to purchase. I
>hear there's a bridge for sale in Brooklyn.
That's sold out. But they told me that there's another one not too far
away, between Brooklyn and Staten Island.
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Fri, 19 Oct 2007 05:15:06 -0700
From: Paul Lalli <mritty@gmail.com>
Subject: Re: perl standard
Message-Id: <1192796106.192067.37230@v29g2000prd.googlegroups.com>
On Oct 19, 5:13 am, "Wade Ward" <zaxf...@invalid.net> wrote:
> "Paul Lalli" <mri...@gmail.com> wrote in message
> > On Oct 18, 7:24 pm, "Wade Ward" <zaxf...@invalid.net> wrote:
> > > Usually they have the full standard available for $250
>
> > Who is this "they" of whom you speak?
>
> They is ISO. I would have a hard time believing that the
> entire body of international standards chose to overlook perl,
Oh, and by the way:
http://www.iso.org/iso/search.htm?qt=Perl&sort=rel&type=simple&published=true
I guess ISO themselves must be 100% wrong about ISO having a standard
too, right? Because, I mean, you HEARD it. Therefore it must exist.
Paul Lalli
------------------------------
Date: Fri, 19 Oct 2007 10:18:43 GMT
From: QoS@domain.invalid
Subject: Re: please help optimize sub
Message-Id: <7w%Ri.11666$2o1.11629@trnddc03>
"A. Sinan Unur" <1usa@llenroc.ude.invalid> wrote in message-id: <Xns99CDEDF12F316asu1cornelledu@127.0.0.1>
>
> xhoster@gmail.com wrote in news:20071018224003.622$XX@newsreader.com:
>
> > "A. Sinan Unur" <1usa@llenroc.ude.invalid> wrote:
> > ...
> ...
>
> >>
> >> Before someone tells me, yes, I know, I should have used Benchmark
> >
> > I disagree. You should have done just what you did do. Using
> > Benchmark doesn't make it easy (and indeed makes it hard) to verify
> > that the various things being tested actually produce the correct (or
> > at least mutually the same) answer. It seems like half the time I see
> > people using Benchmark, at least one of the implementations
> > benchmarked doesn't give the right answer but they never test for
> > that. And I trust the times given by the OS tools like "time" at
> > least as much as I do the Benchmark ones, anyway.
>
> Well, I am glad that you read between the lines and deduced why I set up
> separate scripts. Now that I am reasonably certain the optimized routine
> returns the same results as the original, it might be worthwhile to set
> up a script using Benchmark to be able to compare speeds on different
> platforms as it becomes necessary but I am going to leave that to the
> OP.
>
> Sinan
>
>
> --
> A. Sinan Unur <1usa@llenroc.ude.invalid>
> (remove .invalid and reverse each component for email address)
> clpmisc guidelines: <URL:http://www.augustmail.com/~tadmc/clpmisc.shtml>
Thanks for helping with this, the early return is a good idea. I enjoyed
reading all of your comments and suggestions, and am excited to implement
some of the suggestions this weekend.
------------------------------
Date: Fri, 19 Oct 2007 12:51:19 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: please help optimize sub
Message-Id: <be2hh3p4pi5d22nv8cvgqraucquo5qh72n@4ax.com>
On 19 Oct 2007 02:40:00 GMT, xhoster@gmail.com wrote:
>the same) answer. It seems like half the time I see people using
>Benchmark, at least one of the implementations benchmarked doesn't give the
>right answer but they never test for that. And I trust the times given by
You're right. I know I've committed the sin myself. Actually when I'm
doing Benchmarks now I will also try to include tests, as in
<news:v1cfg3l9biigqq4lb4tbkik7nruvdtoss2@4ax.com>.
>the OS tools like "time" at least as much as I do the Benchmark ones,
>anyway. About the only times I use Benchmark are when I'm tinkering with
But then the benchmark may just be as flawed with the time shell
command as it is with Benchmark.pm!
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Fri, 19 Oct 2007 13:16:06 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: please help optimize sub
Message-Id: <qe4hh35fudsgvg5n7e9ho0uvkluufrpj6j@4ax.com>
On Fri, 19 Oct 2007 12:51:19 +0200, Michele Dondi
<bik.mido@tiscalinet.it> wrote:
>You're right. I know I've committed the sin myself. Actually when I'm
>doing Benchmarks now I will also try to include tests, as in
><news:v1cfg3l9biigqq4lb4tbkik7nruvdtoss2@4ax.com>.
Err, well, except that that didn't do any benchmark. :)
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Fri, 19 Oct 2007 11:55:09 -0000
From: Dale <dale.gerdemann@googlemail.com>
Subject: Re: polymorphic regex -- encoding issue
Message-Id: <1192794909.831588.269070@z24g2000prh.googlegroups.com>
Thanks Ben. The problem is, of course consistency. I want to make
sure, that I also decode '\w' and '\s' so that they match the same
things that they would have matched in the original regex. The perldoc
says one can influence what '\w' matches by using locales. But I
managed to find a consistent translation without using locales (now
I'm answering my own question):
# As before, I search for the word Fibonacci, in CP1251-encoded
Cyrillic
my $search_word =3D encode("cp1251", "=D0=A4=D0=B8=D0=B1=D0=BE=D0=BD=D0=B0=
=D1=87=D1=87=D0=B8");
# CP1251 is an extended ASCII charset in the range 00-FF. Here we
# get this set of characters and decode them into Unicode.
my @cp1251_charset =3D
split(//, decode("CP1251", join("", map { chr } 0x00..0xFF)));
# Find out which of these characters are matched by '\w' (in Unicode).
my @cp1251_wordchars =3D
grep(/\w/, @cp1251_charset);
# The matched word characters are put back into CP1251
my $w =3D encode("CP1251", join("", @cp1251_wordchars));
# We follow the same idea as above for the space characters.
my @cp1251_spacechars =3D
grep(/\s/, @cp1251_charset);
my $s =3D encode("CP1251", join("", @cp1251_spacechars));
# Now we just put the pieces together
my $russian_page =3D get "http://stock.narod.ru/fibo.htm";
while ($russian_page =3D~ m/($search_word)[$s]([$w]+)/g) {
print decode("cp1251", "$1 $2\n");
}
Details (same as in previous version):
Perl version
5=2E8.8
modules used
Encode;
LWP::Simple qw(get);
utf8;
binmode(STDOUT, ":utf8");
Note: Why didn't I use setlocale, as the Perldoc suggests? First
reason: Our computers are somehow set up with a very limited range of
possible locales. Second reason: locales are confusing for me. I
prefer to avoid them. I set my environment to en_US.utf8 and I don't
want to think about locales any more after that.
------------------------------
Date: Fri, 19 Oct 2007 13:11:03 +0300
From: "Rad [Visual C# MVP]" <rad@nospam.com>
Subject: Re: Regular expression to match only strings NOT containing particular words
Message-Id: <fnrgh39glj72k15fu8lv02s3dpg73gt2pm@4ax.com>
On Thu, 18 Oct 2007 22:00:28 -0700, Dylan Nicholson
<wizofaus@hotmail.com> wrote:
>I can write a regular expression that will only match strings that are
>NOT the word apple:
>
>^([^a].*|a[^p].*|ap[^p].*|app[^l].*|apple.+)$
>
>But is there a neater way, and how would I do it to match strings that
>are NOT the word apple OR banana? Then what would be needed to match
>only strings that do not CONTAIN the word "apple" or "banana" or
>"cherry"?
>
>I'd love it if the following worked:
>
>^[^(apple)(banana)(cherry)]*$
>
>But it appears the parantheses are ignored, as
>
>^[(apple)(banana)(cherry)]*$
>
>simply matches any string that consists entire of the characters
>a,b,c,e,h,l,n,r,p & y.
A simple way is to write the regex to match apple or banana or cherry,
do the match and then check the Success property of the match object.
Execute the following mini program
using System;
using System.Collections.Generic;
using System.Text.RegularExpressions;
namespace ConsoleApplication1
{
class Program
{
static void Main(string[] args)
{
Regex r = new Regex(".*apple|banana|cherry.*");
string[] strings =
"apple,banana,cherry,applebanana,applebananacherry,fishapple,chips,chip
and apple,apple pie".Split(',');
foreach (string s in strings)
{
Console.WriteLine("{0} Match? {1}", s,
r.Match(s).Success);
}
Console.ReadLine();
}
}
}
You should get this:
apple Match? True
banana Match? True
cherry Match? True
applebanana Match? True
applebananacherry Match? True
fishapple Match? True
chips Match? False
chip and apple Match? True
apple pie Match? True
--
http://bytes.thinkersroom.com
------------------------------
Date: Fri, 19 Oct 2007 13:11:29 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: Regular expression to match only strings NOT containing particular words
Message-Id: <1u3hh3lphhccqccc5dsli0hac4d5t7nq3c@4ax.com>
On Thu, 18 Oct 2007 22:00:28 -0700, Dylan Nicholson
<wizofaus@hotmail.com> wrote:
>But is there a neater way, and how would I do it to match strings that
>are NOT the word apple OR banana? Then what would be needed to match
>only strings that do not CONTAIN the word "apple" or "banana" or
>"cherry"?
The general answer is that you should use separate regexen and logical
operators, or an explicit !~ but the subject of negating regexen is
discussed to some depth in the following thread @ PM:
http://perlmonks.org/?node_id=588315
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
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 V11 Issue 953
**************************************
