[29406] in Perl-Users-Digest
Perl-Users Digest, Issue: 650 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Jul 13 14:10:03 2007
Date: Fri, 13 Jul 2007 11:09:05 -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, 13 Jul 2007 Volume: 11 Number: 650
Today's topics:
Re: "Pop" an alert of some sort in Windows <bik.mido@tiscalinet.it>
Re: "Pop" an alert of some sort in Windows <lambik@kieffer.nl>
Re: "Pop" an alert of some sort in Windows <bik.mido@tiscalinet.it>
Re: "Pop" an alert of some sort in Windows <stoupa@practisoft.cz>
Re: "Pop" an alert of some sort in Windows <bik.mido@tiscalinet.it>
Re: "Pop" an alert of some sort in Windows <savagebeaste@yahoo.com>
Re: "Pop" an alert of some sort in Windows <bik.mido@tiscalinet.it>
Re: [PerlMonks] About List::Util's pure Perl shuffle() <hjp-usenet2@hjp.at>
Re: [PerlMonks] About List::Util's pure Perl shuffle() <bik.mido@tiscalinet.it>
Re: [PerlMonks] About List::Util's pure Perl shuffle() <uri@stemsystems.com>
Does my JAPH suck? <david.seruyange@gmail.com>
Re: Does my JAPH suck? krakle@visto.com
Re: Does my JAPH suck? <uri@stemsystems.com>
Re: Does my JAPH suck? <bik.mido@tiscalinet.it>
Re: Does my JAPH suck? <bik.mido@tiscalinet.it>
perl modules installation <vivek.menon79@gmail.com>
Re: perl modules installation (Jens Thoms Toerring)
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 13 Jul 2007 12:24:14 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: "Pop" an alert of some sort in Windows
Message-Id: <3lke93d1rqtc6pcdehg2du7poa2raqjb4j@4ax.com>
On Fri, 13 Jul 2007 11:38:21 +0200, "Lambik" <lambik@kieffer.nl>
wrote:
>> Win32::GUI version 99 required--this is only version 1.03 at
>
>As Rob has mentioned, the most recent version is 1.05 which you can also get
>at Bribes (add http://www.bribes.org/perl/ppm/package.lst to the ppm
>repository).
Strange: it is *already* amongst the repositories I set up in ppm...
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, 13 Jul 2007 13:29:50 +0200
From: "Lambik" <lambik@kieffer.nl>
Subject: Re: "Pop" an alert of some sort in Windows
Message-Id: <469761c3$0$37732$5fc3050@dreader2.news.tiscali.nl>
"Michele Dondi" <bik.mido@tiscalinet.it> wrote in message
news:3lke93d1rqtc6pcdehg2du7poa2raqjb4j@4ax.com...
> On Fri, 13 Jul 2007 11:38:21 +0200, "Lambik" <lambik@kieffer.nl>
> wrote:
>
> >> Win32::GUI version 99 required--this is only version 1.03 at
> >
> >As Rob has mentioned, the most recent version is 1.05 which you can also
get
> >at Bribes (add http://www.bribes.org/perl/ppm/package.lst to the ppm
> >repository).
>
> Strange: it is *already* amongst the repositories I set up in ppm...
>
>
> Michele
Then I would say: Either you've installed the wrong one (when two are
listed) or you have made a typo in the repository. Because it is really
there.
------------------------------
Date: Fri, 13 Jul 2007 13:53:15 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: "Pop" an alert of some sort in Windows
Message-Id: <rqpe93lb4vbeo4itscpt2cjar92jbjsr1g@4ax.com>
On Fri, 13 Jul 2007 13:29:50 +0200, "Lambik" <lambik@kieffer.nl>
wrote:
>Then I would say: Either you've installed the wrong one (when two are
>listed) or you have made a typo in the repository. Because it is really
>there.
Well, I just did
ppm install Win32::GUI
perhaps the order of the repositories does matter? I assumed the most
up to date available version would have been chosen...
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, 13 Jul 2007 14:21:05 +0200
From: "Petr Vileta" <stoupa@practisoft.cz>
Subject: Re: "Pop" an alert of some sort in Windows
Message-Id: <f77r09$27rj$1@ns.felk.cvut.cz>
Michele Dondi wrote:
> On Fri, 13 Jul 2007 13:29:50 +0200, "Lambik" <lambik@kieffer.nl>
> wrote:
>
>> Then I would say: Either you've installed the wrong one (when two are
>> listed) or you have made a typo in the repository. Because it is
>> really there.
>
> Well, I just did
>
> ppm install Win32::GUI
>
> perhaps the order of the repositories does matter? I assumed the most
> up to date available version would have been chosen...
>
>
> Michele
I rather use
ppm search Win32::GUI
and in next step
ppm install X
where "X" is the number of package what I want to select from list
--
Petr Vileta, Czech republic
(My server rejects all messages from Yahoo and Hotmail. Send me your mail
from another non-spammer site please.)
------------------------------
Date: Fri, 13 Jul 2007 15:13:34 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: "Pop" an alert of some sort in Windows
Message-Id: <5jue93dlsg88i0540rvspasohnmj4q7ick@4ax.com>
On Fri, 13 Jul 2007 14:21:05 +0200, "Petr Vileta"
<stoupa@practisoft.cz> wrote:
>I rather use
> ppm search Win32::GUI
Strange:
C:\temp>ppm search Win32::GUI
Downloading ActiveState Package Repository packlist...done
Updating ActiveState Package Repository database...done
Downloading uwinnipeg packlist...not modified
Downloading bribes packlist...done
Updating bribes database...done
Downloading trouchelle packlist...not modified
Downloading SoulCage packlist...done
Downloading SoulCage AppConfig PPD...not modified
Downloading SoulCage Class-Loader PPD...not modified
Downloading SoulCage Convert-ASCII-Armour PPD...not modified
Downloading SoulCage Convert-ASN1 PPD...not modified
Downloading SoulCage Convert-PEM PPD...not modified
Downloading SoulCage Crypt-Blowfish PPD...not modified
Downloading SoulCage Crypt-DES PPD...not modified
Downloading SoulCage Crypt-DES_EDE3 PPD...not modified
Downloading SoulCage Crypt-DH PPD...not modified
Downloading SoulCage Crypt-DSA PPD...not modified
Downloading SoulCage Crypt-Random PPD...not modified
Downloading SoulCage Crypt-Rijndael PPD...not modified
Downloading SoulCage Data-Buffer PPD...not modified
Downloading SoulCage Digest-BubbleBabble PPD...not modified
Downloading SoulCage IO-Select-Trap PPD...not modified
Downloading SoulCage Math-Pari PPD...not modified
Downloading SoulCage Net-SFTP PPD...not modified
Downloading SoulCage Net-SSH-Perl PPD...not modified
Downloading SoulCage Net-SSH-W32Perl PPD...not modified
Downloading SoulCage Template-Toolkit PPD...not modified
1: Win32-GUI
Perl-Win32 Graphical User Interface Extension
Version: 1.03
Author: Robert May (rmay_cpan@popeslane.clara.co.uk)
Provide: BuildTools version 0.01
Provide: Config_mO
Provide: SrcParser version 0.01
Provide: Win32::GUI version 1.03
Provide: Win32::GUI::BitmapInline version 0.01
Provide: Win32::GUI::GridLayout version 0.03
Repo: ActiveState Package Repository
CPAN: http://search.cpan.org/dist/Win32-GUI-1.03/
Installed: 1.03 (site)
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, 13 Jul 2007 08:55:49 -0700
From: "Clenna Lumina" <savagebeaste@yahoo.com>
Subject: Re: "Pop" an alert of some sort in Windows
Message-Id: <5fplgcF3e0k4hU1@mid.individual.net>
Petr Vileta wrote:
> Michele Dondi wrote:
>> On Fri, 13 Jul 2007 13:29:50 +0200, "Lambik" <lambik@kieffer.nl>
>> wrote:
>>
>>> Then I would say: Either you've installed the wrong one (when two
>>> are listed) or you have made a typo in the repository. Because it is
>>> really there.
>>
>> Well, I just did
>>
>> ppm install Win32::GUI
>>
>> perhaps the order of the repositories does matter? I assumed the most
>> up to date available version would have been chosen...
>>
>>
>> Michele
> I rather use
> ppm search Win32::GUI
> and in next step
> ppm install X
> where "X" is the number of package what I want to select from list
> --
>
> Petr Vileta, Czech republic
> (My server rejects all messages from Yahoo and Hotmail. Send me your
> mail from another non-spammer site please.)
That should be:
ppm search Win32-GUI
They use a hyphen as a separate instead of double colon.
--
CL
------------------------------
Date: Fri, 13 Jul 2007 19:34:13 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: "Pop" an alert of some sort in Windows
Message-Id: <rqdf93hjhpb8r5naqs9ud8qp5uptr5ccs7@4ax.com>
On Fri, 13 Jul 2007 08:55:49 -0700, "Clenna Lumina"
<savagebeaste@yahoo.com> wrote:
>That should be:
> ppm search Win32-GUI
>
>They use a hyphen as a separate instead of double colon.
Well, the new version of ppm seems to support the double colon too.
But indeed it only finds version 1.05 of the package doing as you
suggest.
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, 13 Jul 2007 14:20:48 +0200
From: "Peter J. Holzer" <hjp-usenet2@hjp.at>
Subject: Re: [PerlMonks] About List::Util's pure Perl shuffle()
Message-Id: <slrnf9erh0.79h.hjp-usenet2@zeno.hjp.at>
On 2007-07-13 09:32, Michele Dondi <bik.mido@tiscalinet.it> wrote:
>
> #!/usr/bin/perl
>
> use strict;
> use warnings;
> use Benchmark qw/:all :hireswallclock/;
>
> sub naive (@) {
> my @l=@_;
> for (reverse 1..$#l) {
> my $r=int rand($_+1);
> @l[$_,$r]=@l[$r,$_];
> }
> @l;
> }
>
> sub listutil (@) {
> my @a=\(@_);
> my $n;
> my $i=@_;
> map {
> $n = rand($i--);
> (${$a[$n]}, $a[$n] = $a[$i])[0];
> } @_;
> }
>
> cmpthese -60, { map { $_ => "$_ 1..1000" } qw/naive listutil/ };
>
> __END__
>
> The results are as follows:
>
> C:\temp>perl lus.pl
> Rate naive listutil
> naive 588/s -- -14%
> listutil 684/s 16% --
The main performance improvement comes from avoiding hash slices. Just
replacing @l[$_,$r]=@l[$r,$_]; in your code with a conventional swap via
a temporary variable:
my $x = $l[$r];
$l[$r] = $l[$_];
$l[$_] = $x;
gives me a 10 % performance boost.
The rest of the improvement comes from not swapping in-place at all, but
building a new array from scratch:
sub naive2 (@) {
my @l=@_;
my @l2;
for (reverse 0..$#l) {
my $r=int rand($_+1);
push @l2, $l[$r];
$l[$r] = $l[$_];
}
@l2;
}
is just as fast as the map (and it does the same thing, really).
Fascinating. I would have expected both changes to make the performance
worse, not better. Just shows again that intuition is an unreliable
guide on perl performance.
hp
--
_ | Peter J. Holzer | I know I'd be respectful of a pirate
|_|_) | Sysadmin WSR | with an emu on his shoulder.
| | | hjp@hjp.at |
__/ | http://www.hjp.at/ | -- Sam in "Freefall"
------------------------------
Date: Fri, 13 Jul 2007 15:08:20 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: [PerlMonks] About List::Util's pure Perl shuffle()
Message-Id: <98ue939233qbnrgcju9e82v6m0f141n3nh@4ax.com>
On Fri, 13 Jul 2007 14:20:48 +0200, "Peter J. Holzer"
<hjp-usenet2@hjp.at> wrote:
>Fascinating. I would have expected both changes to make the performance
>worse, not better. Just shows again that intuition is an unreliable
>guide on perl performance.
For more (possibly) counter-intuitive stuff, please see the whole PM
thread... feel free to report here your own experiences and ideas
about what you see there!
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, 13 Jul 2007 15:43:03 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: [PerlMonks] About List::Util's pure Perl shuffle()
Message-Id: <x7d4yw48e0.fsf@mail.sysarch.com>
>>>>> "PJH" == Peter J Holzer <hjp-usenet2@hjp.at> writes:
PJH> sub naive2 (@) {
PJH> my @l=@_;
PJH> my @l2;
PJH> for (reverse 0..$#l) {
PJH> my $r=int rand($_+1);
PJH> push @l2, $l[$r];
PJH> $l[$r] = $l[$_];
PJH> }
PJH> @l2;
PJH> }
a minor optimization would be to drop the int() call as any number can
be used as an array index as it will do int for you. it may not be
faster or by much if any but it will be less perl code and that is
usually a speed win.
also if your data is large things, the all the extra copying will cost
you vs copying refs. and in the above code the copy of @_ isn't needed
since you can rearrange @_ safely.
counting down from $#l should be faster than a reverse on a list range
especially for longer arrays.
indexing into arrays is slow in perl. so maybe this change would be
faster too (factoring out the $l[$r]):
my $r= \$l[rand($_+1)] ;
push @l2, $$r;
$$r = $l[$_];
i don't have the time to play with all of these and benchmark them so i
leave them to the reader. :)
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: Fri, 13 Jul 2007 16:02:23 -0000
From: da5id <david.seruyange@gmail.com>
Subject: Does my JAPH suck?
Message-Id: <1184342543.799136.128080@m3g2000hsh.googlegroups.com>
Perhaps not the most original, but at least now I can say I have
one...
Comments anyone?
map{print "$_ "}split(/\d/, join('', map /(\w|\d)\w/gi, qw(Jaubsctd1a
Aenfogthhiejrk2b Plemrmln3c Hoapcqkresrt4d)));
------------------------------
Date: Fri, 13 Jul 2007 09:13:51 -0700
From: krakle@visto.com
Subject: Re: Does my JAPH suck?
Message-Id: <1184343231.342949.74160@22g2000hsm.googlegroups.com>
On Jul 13, 11:02 am, da5id <david.seruya...@gmail.com> wrote:
> Perhaps not the most original, but at least now I can say I have
> one...
>
> Comments anyone?
Yea... You wasted your time accomplishing nothing...
------------------------------
Date: Fri, 13 Jul 2007 16:26:31 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Does my JAPH suck?
Message-Id: <x78x9k46dj.fsf@mail.sysarch.com>
>>>>> "d" == da5id <david.seruyange@gmail.com> writes:
d> Perhaps not the most original, but at least now I can say I have
d> one...
d> Comments anyone?
d> map{print "$_ "}split(/\d/, join('', map /(\w|\d)\w/gi, qw(Jaubsctd1a
d> Aenfogthhiejrk2b Plemrmln3c Hoapcqkresrt4d)));
(\w|\d) is the same as (\w) since it also has \d. in general | for
choosing character classes is slower than just doing a char class.
map{print "$_ "}
that is map in a void context. also it calls print in a loop whereas it
is better to build the list with map and call print once.
print map "$_ "
the /i on the second regex is redundant as \w has all upper and lower
letters in it.
that's all for now. good first try.
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: Fri, 13 Jul 2007 19:44:15 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: Does my JAPH suck?
Message-Id: <n8ef93pkfiaqqtvsio6a79dgrbnocdonvg@4ax.com>
On Fri, 13 Jul 2007 16:02:23 -0000, da5id <david.seruyange@gmail.com>
wrote:
>map{print "$_ "}split(/\d/, join('', map /(\w|\d)\w/gi, qw(Jaubsctd1a
>Aenfogthhiejrk2b Plemrmln3c Hoapcqkresrt4d)));
Well, it's certainly too easy to see both the logic and where the data
is actually stored. In fact you can even see the JAPH motto at a
glance... and it's not one of those tricks in which you see it at a
glance, but then it is extracted and printed by some other means. Good
first attempt, but poor obfu attained.
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, 13 Jul 2007 19:39:57 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: Does my JAPH suck?
Message-Id: <s1ef93tgfe8jqu528a8dtbkfe33uf5f2r3@4ax.com>
On Fri, 13 Jul 2007 16:26:31 GMT, Uri Guttman <uri@stemsystems.com>
wrote:
>map{print "$_ "}
>
>that is map in a void context. also it calls print in a loop whereas it
>is better to build the list with map and call print once.
Well, it is a JAPH! So those remarks just don't apply. The "problems"
are others...
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, 13 Jul 2007 15:29:09 -0000
From: Vivek Menon <vivek.menon79@gmail.com>
Subject: perl modules installation
Message-Id: <1184340549.467697.308730@22g2000hsm.googlegroups.com>
Hello All,
I am a beginner and I am trying to install a bioinformatics
utility(Interproscan) on a Sun Solaris machine. This software is based
on Perl packages and I am having problems installing some specific
perl modules. Can someone help??
I need to install the following perl modules:
Module XML::Parser
Module XML::Quote
Module Mail::Send
Module DB_File
Module IO::Scalar
Module URI::Escape
Module IO::String
-------
I have tried installing as per the instructions on
http://www.rcbowen.com/imho/perl/modules.html#Installing_modules_on_Unix
using CPAN. However I have this error:
Writing Makefile for ---(module)
-- NOT OK
Running make test
Can't test without successful make
Running make install
make had returned bad status, install seems impossible
I had another error that asked me to declare the LIBEXPAT and
LIBEXPATINC path..even after declaring these paths, I could not
install the modules.
----
FYI I am running on Solaris 10
Thanks,
Vivek
------------------------------
Date: 13 Jul 2007 16:10:04 GMT
From: jt@toerring.de (Jens Thoms Toerring)
Subject: Re: perl modules installation
Message-Id: <5fpmesF3e30qmU1@mid.uni-berlin.de>
Vivek Menon <vivek.menon79@gmail.com> wrote:
> I am a beginner and I am trying to install a bioinformatics
> utility(Interproscan) on a Sun Solaris machine. This software is based
> on Perl packages and I am having problems installing some specific
> perl modules. Can someone help??
> I need to install the following perl modules:
> Module XML::Parser
> Module XML::Quote
> Module Mail::Send
> Module DB_File
> Module IO::Scalar
> Module URI::Escape
> Module IO::String
> -------
> I have tried installing as per the instructions on
> http://www.rcbowen.com/imho/perl/modules.html#Installing_modules_on_Unix
> using CPAN. However I have this error:
> Writing Makefile for ---(module)
> -- NOT OK
Did you try to install without being the root user?
> Running make test
> Can't test without successful make
> Running make install
> make had returned bad status, install seems impossible
> I had another error that asked me to declare the LIBEXPAT and
> LIBEXPATINC path..even after declaring these paths, I could not
> install the modules.
There are several methids losted in that section and it's unclear
what you have been using. You write that you were "using "CPAN"
but I can't recognize it from the output you post.
First of all you of course need a C compiler installed. If that
is the case you should log in as root and then do
perl -MCPAN -e "install XML::Parser"
to install the XML::Parser module. If this works repeat for
the other modules, otherwise please post the exact output
you got.
Regards, Jens
--
\ Jens Thoms Toerring ___ jt@toerring.de
\__________________________ http://toerring.de
------------------------------
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 650
**************************************
