[31486] in Perl-Users-Digest
Perl-Users Digest, Issue: 2745 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Dec 31 11:09:43 2009
Date: Thu, 31 Dec 2009 08:09:07 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Thu, 31 Dec 2009 Volume: 11 Number: 2745
Today's topics:
builtin array union intersection function <pengyu.ut@gmail.com>
Devel::REPL installation failed <pengyu.ut@gmail.com>
Re: FAQ 8.1 How do I find out which operating system I' <ben@morrow.me.uk>
Re: How to install quietly? (perl -MCPAN -e shell; inst <rkb@i.frys.com>
Re: How to install quietly? (perl -MCPAN -e shell; inst <ben@morrow.me.uk>
How to install quietly? (perl -MCPAN -e shell; install <pengyu.ut@gmail.com>
Re: How to install quietly? (perl -MCPAN -e shell; inst <ben@morrow.me.uk>
Re: How to print hash recursively? <sreservoir@gmail.com>
Re: How to print hash recursively? <derykus@gmail.com>
Re: How to print hash recursively? <derykus@gmail.com>
Re: How to put '#!/usr/bin/env perl -w' at the beginnin <hjp-usenet2@hjp.at>
Re: How to serialize a perl object in a .gz file <ben@morrow.me.uk>
Re: How to serialize a perl object in a .gz file <pengyu.ut@gmail.com>
Re: How to serialize a perl object in a .gz file <nitte.sudhir@gmail.com>
Re: How to serialize a perl object in a .gz file <marc.girod@gmail.com>
Re: How to serialize a perl object in a .gz file <ben@morrow.me.uk>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 31 Dec 2009 07:56:49 -0800 (PST)
From: Peng Yu <pengyu.ut@gmail.com>
Subject: builtin array union intersection function
Message-Id: <d6db6992-05ec-4fa2-80b2-a4c958a6ff94@c34g2000yqn.googlegroups.com>
There is some code fragment that can take union and intersection of
two arrays.
http://www.perlmonks.org/?node_id=64798
But I'm looking for some functions in the library. Could somebody let
me know if such things are available in the perl library?
------------------------------
Date: Wed, 30 Dec 2009 16:15:34 -0800 (PST)
From: Peng Yu <pengyu.ut@gmail.com>
Subject: Devel::REPL installation failed
Message-Id: <ba682c44-a2ff-4821-ae3f-d764f49a8891@26g2000yqo.googlegroups.com>
I run
>perl -MCPAN -e shell
cpan>install Devel::REPL
It gave me a lot of output on the screen. But eventually the
installation failed. I only paste the last a few lines of the output
since the entire output is too long. Could somebody let me know how to
fix the problem?
# Failed test 'use Devel::REPL::Plugin::ReadLineHistory;'
# at t/load_core.t line 18.
# Tried to use 'Devel::REPL::Plugin::ReadLineHistory'.
# Error: Attempt to reload Devel/REPL/Plugin.pm aborted.
# Compilation failed in require at /home/pengy/.cpan/build/Devel-
REPL-1.003007-nEx9LW/blib/lib/Devel/REPL/Plugin/ReadLineHistory.pm
line 8.
# BEGIN failed--compilation aborted at /home/pengy/.cpan/build/Devel-
REPL-1.003007-nEx9LW/blib/lib/Devel/REPL/Plugin/ReadLineHistory.pm
line 8.
# Compilation failed in require at (eval 19) line 2.
# BEGIN failed--compilation aborted at (eval 19) line 2.
# Failed test 'use Devel::REPL::Plugin::ShowClass;'
# at t/load_core.t line 19.
# Tried to use 'Devel::REPL::Plugin::ShowClass'.
# Error: Attempt to reload Devel/REPL/Plugin.pm aborted.
# Compilation failed in require at /home/pengy/.cpan/build/Devel-
REPL-1.003007-nEx9LW/blib/lib/Devel/REPL/Plugin/ShowClass.pm line 2.
# BEGIN failed--compilation aborted at /home/pengy/.cpan/build/Devel-
REPL-1.003007-nEx9LW/blib/lib/Devel/REPL/Plugin/ShowClass.pm line 2.
# Compilation failed in require at (eval 20) line 2.
# BEGIN failed--compilation aborted at (eval 20) line 2.
# Failed test 'use Devel::REPL::Plugin::Timing;'
# at t/load_core.t line 20.
# Tried to use 'Devel::REPL::Plugin::Timing'.
# Error: Attempt to reload Devel/REPL/Plugin.pm aborted.
# Compilation failed in require at /home/pengy/.cpan/build/Devel-
REPL-1.003007-nEx9LW/blib/lib/Devel/REPL/Plugin/Timing.pm line 3.
# BEGIN failed--compilation aborted at /home/pengy/.cpan/build/Devel-
REPL-1.003007-nEx9LW/blib/lib/Devel/REPL/Plugin/Timing.pm line 3.
# Compilation failed in require at (eval 21) line 2.
# BEGIN failed--compilation aborted at (eval 21) line 2.
# Failed test 'use Devel::REPL::Plugin::Turtles;'
# at t/load_core.t line 21.
# Tried to use 'Devel::REPL::Plugin::Turtles'.
# Error: Attempt to reload Devel/REPL/Plugin.pm aborted.
# Compilation failed in require at /home/pengy/.cpan/build/Devel-
REPL-1.003007-nEx9LW/blib/lib/Devel/REPL/Plugin/Turtles.pm line 2.
# BEGIN failed--compilation aborted at /home/pengy/.cpan/build/Devel-
REPL-1.003007-nEx9LW/blib/lib/Devel/REPL/Plugin/Turtles.pm line 2.
# Compilation failed in require at (eval 22) line 2.
# BEGIN failed--compilation aborted at (eval 22) line 2.
# Looks like you failed 17 tests of 17.
t/load_core.t .. Dubious, test returned 17 (wstat 4352, 0x1100)
Failed 17/17 subtests
Test Summary Report
-------------------
t/load_core.t (Wstat: 4352 Tests: 17 Failed: 17)
Failed tests: 1-17
Non-zero exit status: 17
Files=1, Tests=17, 0 wallclock secs ( 0.03 usr 0.00 sys + 0.02
cusr 0.02 csys = 0.07 CPU)
Result: FAIL
Failed 1/1 test programs. 17/17 subtests failed.
make: *** [test_dynamic] Error 17
MSTROUT/Devel-REPL-1.003007.tar.gz
/usr/bin/make test -- NOT OK
//hint// to see the cpan-testers results for installing this module,
try:
reports MSTROUT/Devel-REPL-1.003007.tar.gz
Running make install
make test had returned bad status, won't install without force
Failed during this command:
ADIE/Test-Exception-0.27.tar.gz : make_test NO
DROLSKY/Class-MOP-0.97.tar.gz : make_test NO
FLORA/Moose-0.93.tar.gz : make_test NO
GRODITI/MooseX-Object-Pluggable-0.0011.tar.gz: make_test NO
RJBS/Getopt-Long-Descriptive-0.083.tar.gz : make_test NO
BOBTFISH/MooseX-Getopt-0.26.tar.gz : make_test NO
CHORNY/Test-Warn-0.21.zip : make_test NO
PETDANCE/WWW-Mechanize-1.60.tar.gz : make_test NO one
dependency not OK (Test::Warn)
SARTAK/App-Nopaste-0.17.tar.gz : make_test NO
DROLSKY/MooseX-AttributeHelpers-0.22.tar.gz : make_test NO
MSTROUT/Devel-REPL-1.003007.tar.gz : make_test NO
------------------------------
Date: Wed, 30 Dec 2009 23:59:18 +0000
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: FAQ 8.1 How do I find out which operating system I'm running under?
Message-Id: <m36t07-crs2.ln1@osiris.mauzo.dyndns.org>
Quoth PerlFAQ Server <brian@theperlreview.com>:
>
> 8.1: How do I find out which operating system I'm running under?
>
> The $^O variable ($OSNAME if you use English) contains an indication of
> the name of the operating system (not its release number) that your perl
> binary was built for.
This answer could perhaps refer to the PLATFORMS section in perlport,
where the values of $^O under many OSs are listed, as well as a way to
tell the various flavours of Win32 apart.
Ben
------------------------------
Date: Wed, 30 Dec 2009 19:45:21 -0800 (PST)
From: Ron Bergin <rkb@i.frys.com>
Subject: Re: How to install quietly? (perl -MCPAN -e shell; install Devel::REPL)
Message-Id: <ad0565a8-6baa-45ae-96d8-148c662ca3dc@m3g2000yqf.googlegroups.com>
On Dec 30, 3:54=A0pm, Peng Yu <pengyu...@gmail.com> wrote:
> I run>perl -MCPAN -e shell
>
> cpan>install Devel::REPL
>
> But it prompt me to answer this question many times. I'm wondering
> which option I should config in ~/.cpan/Cpan/MyConfig.pm
>
> =3D=3D> Auto-install the 1 optional module(s) from CPAN? [y]
Is this what you're looking for?
perl -MCPAN -e shell
Set up gcc environment - 3.4.5 (mingw-vista special r3)
cpan shell -- CPAN exploration and modules installation (v1.9402)
Enter 'h' for help.
cpan> o conf prerequisites_policy follow
prerequisites_policy [follow]
Please use 'o conf commit' to make the config permanent!
cpan>
That setting will install all prereq's without prompting.
------------------------------
Date: Thu, 31 Dec 2009 14:24:00 +0000
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: How to install quietly? (perl -MCPAN -e shell; install Devel::REPL)
Message-Id: <0pou07-gg13.ln1@osiris.mauzo.dyndns.org>
Quoth Ron Bergin <rkb@i.frys.com>:
> On Dec 30, 3:54 pm, Peng Yu <pengyu...@gmail.com> wrote:
> > I run>perl -MCPAN -e shell
> >
> > cpan>install Devel::REPL
> >
> > But it prompt me to answer this question many times. I'm wondering
> > which option I should config in ~/.cpan/Cpan/MyConfig.pm
> >
> > ==> Auto-install the 1 optional module(s) from CPAN? [y]
>
> Is this what you're looking for?
>
> cpan> o conf prerequisites_policy follow
> prerequisites_policy [follow]
> Please use 'o conf commit' to make the config permanent!
>
> That setting will install all prereq's without prompting.
No it won't, not if the prompts are coming from Module::AutoInstall
rather than from CPAN.pm. This is primarily why M::AI is considered a
bad idea now.
Ben
------------------------------
Date: Wed, 30 Dec 2009 15:54:32 -0800 (PST)
From: Peng Yu <pengyu.ut@gmail.com>
Subject: How to install quietly? (perl -MCPAN -e shell; install Devel::REPL)
Message-Id: <82e6a180-b92e-4b43-a7be-33da5a64624f@j24g2000yqa.googlegroups.com>
I run
>perl -MCPAN -e shell
cpan>install Devel::REPL
But it prompt me to answer this question many times. I'm wondering
which option I should config in ~/.cpan/Cpan/MyConfig.pm
==> Auto-install the 1 optional module(s) from CPAN? [y]
------------------------------
Date: Thu, 31 Dec 2009 01:09:18 +0000
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: How to install quietly? (perl -MCPAN -e shell; install Devel::REPL)
Message-Id: <u6at07-24t2.ln1@osiris.mauzo.dyndns.org>
Quoth Peng Yu <pengyu.ut@gmail.com>:
> I run
> >perl -MCPAN -e shell
> cpan>install Devel::REPL
>
> But it prompt me to answer this question many times. I'm wondering
> which option I should config in ~/.cpan/Cpan/MyConfig.pm
>
> ==> Auto-install the 1 optional module(s) from CPAN? [y]
This is due to Module::AutoInstall, which is generally considered
nowadays to have been a Bad Idea. Unfortunately, because of the way
Module::Install works there are likely to be modules using it on CPAN
for some time.
You need to set PERL_AUTOINSTALL=--defaultdeps in your environment. I
don't know if there's any way to put this in CPAN's config. You can also
set it to --alldeps instead to answer 'y' to all the questions (rather
than taking the default answer).
Ben
------------------------------
Date: Thu, 31 Dec 2009 18:27:08 +0800
From: sreservoir <sreservoir@gmail.com>
Subject: Re: How to print hash recursively?
Message-Id: <hhhu9u$23r$1@speranza.aioe.org>
On 12/31/2009 6:02 AM, Peng Yu wrote:
> On Dec 30, 3:24 pm, Tad McClellan<ta...@seesig.invalid> wrote:
>> Peng Yu<pengyu...@gmail.com> wrote:
>>> while ( ($k,$v) = each %hash ) {
>>> print "$k => $v\n";
>>> }
>>
>>> The above code would not print the content of $v, if $v points to
>>> complex data structure such as arrays, hash of arrays, etc.
>>
>>> I'm wondering if there is a convenient function that can print a hash
>>> table recursively into the elements.
>>
>> I think you are looking for:
>>
>> perldoc Data::Dumper
>
> If there are many keys in %hash, is there an option in Data::Dumper so
> that only the first a few key value pairs are printed?
there is no enumeration in a hash
------------------------------
Date: Thu, 31 Dec 2009 02:33:24 -0800 (PST)
From: "C.DeRykus" <derykus@gmail.com>
Subject: Re: How to print hash recursively?
Message-Id: <7188c14a-8b6c-49bd-9e92-88723de0cd81@d20g2000yqh.googlegroups.com>
On Dec 30, 2:02=A0pm, Peng Yu <pengyu...@gmail.com> wrote:
> On Dec 30, 3:24=A0pm, Tad McClellan <ta...@seesig.invalid> wrote:
>
> ...
>
> > I think you are looking for:
>
> > =A0 =A0perldoc Data::Dumper
>
> If there are many keys in %hash, is there an option in Data::Dumper so
> that only the first a few key value pairs are printed?
I don't know but you could easily partition out a few:
# tie my %hash, 'Tie::IxHash'; # to ensure ordering
# tie my %few, 'Tie::IxHash'; #
@few{(keys %hash)[0..4]}=3D(values %hash)[0..4]; # dump only 5
print Dumper \%few;
--
Charles DeRykus
------------------------------
Date: Thu, 31 Dec 2009 02:46:24 -0800 (PST)
From: "C.DeRykus" <derykus@gmail.com>
Subject: Re: How to print hash recursively?
Message-Id: <2122fa24-fd2e-4e76-b051-9fb0bad3457d@j4g2000yqe.googlegroups.com>
On Dec 31, 2:33=A0am, "C.DeRykus" <dery...@gmail.com> wrote:
> On Dec 30, 2:02=A0pm, Peng Yu <pengyu...@gmail.com> wrote:
>
> > On Dec 30, 3:24=A0pm, Tad McClellan <ta...@seesig.invalid> wrote:
>
> > ...
>
> > > I think you are looking for:
>
> > > =A0 =A0perldoc Data::Dumper
>
> > If there are many keys in %hash, is there an option in Data::Dumper so
> > that only the first a few key value pairs are printed?
>
> I don't know but you could easily partition out a few:
>
> =A0 # tie my %hash, 'Tie::IxHash'; =A0# to ensure ordering
> =A0 # tie my %few, 'Tie::IxHash'; =A0 #
>
> =A0 @few{(keys %hash)[0..4]}=3D(values %hash)[0..4]; # dump only 5
> =A0 print Dumper \%few;
>
For relatively simple hashes only though... more complexity
will probably frustrate attempts at satisfactory partitioning.
--
Charles DeRykus
------------------------------
Date: Thu, 31 Dec 2009 12:47:48 +0100
From: "Peter J. Holzer" <hjp-usenet2@hjp.at>
Subject: Re: How to put '#!/usr/bin/env perl -w' at the beginning of a perl script?
Message-Id: <slrnhjp3r5.j78.hjp-usenet2@hrunkner.hjp.at>
On 2009-12-30 21:13, Ilya Zakharevich <nospam-abuse@ilyaz.org> wrote:
> On 2009-12-30, Peter J. Holzer <hjp-usenet2@hjp.at> wrote:
>>> The right solution is to add the "nonstandard" location to $PATH, so
>>> that env can find perl there.
>>
>> Using /usr/bin/env and relying on the PATH is not a good idea:
>>
>> * Perl scripts are often called with a minimal PATH (cron jobs, CGI
>> scripts, etc.). Then the perl executable won't be found.
>> * The sysadmin may install a new perl executable in a directory which
>> appears earlier in the path - then the wrong executable will be
>> found.
>> * In some situations manipulation of the path may pose a security risk.
>>
>> In short, I think a script should be as self-contained as possible.
>> Relying on the PATH often leads to trouble and can easily be avoided.
>
> Cannot agree here. Your arguments show that "it is has possible
> drawbacks", not that it "is not a good idea".
In 20 years of system administration I have seen quite a lot of scripts
break because they had avoidable dependencies on the environment.
Sometimes in catastrophic ways.
> There are VERY STRONG positive side to having a script in a form which
> does not require you to explain to your grandmother how to exit vi... :-( :-)
OTOH this was never a problem.
My grandmother never used a computer in her live. My parents are
unlikely to ever use a script which they haven't installed with the
package manager.
And even if they do, the script should come with a Makefile which does
the right thing on "make install". It is the responsibility of a
software author to make their software robust, especially if it is
intended to be used by users who don't know how to exit vi.
hp
------------------------------
Date: Wed, 30 Dec 2009 23:54:29 +0000
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: How to serialize a perl object in a .gz file
Message-Id: <lq5t07-6os2.ln1@osiris.mauzo.dyndns.org>
Quoth Peng Yu <pengyu.ut@gmail.com>:
> http://en.wikipedia.org/wiki/Serialization#Perl
>
> The following example store the object in an unzipped file. I'm
> wondering how to serialize a perl object in a .gz file.
Uh, gzip the data once you've serialized it? You can use
IO::Compress::Gzip to do the compression for you, and you can use
Storable::freeze rather than Storable::store to avoid the temporary file
if your data's small enough.
Ben
------------------------------
Date: Wed, 30 Dec 2009 19:26:41 -0800 (PST)
From: Peng Yu <pengyu.ut@gmail.com>
Subject: Re: How to serialize a perl object in a .gz file
Message-Id: <6d7b7dbd-0bd3-4254-90ed-0ad75dd63233@j14g2000yqm.googlegroups.com>
On Dec 30, 5:54=A0pm, Ben Morrow <b...@morrow.me.uk> wrote:
> Quoth Peng Yu <pengyu...@gmail.com>:
>
> >http://en.wikipedia.org/wiki/Serialization#Perl
>
> > The following example store the object in an unzipped file. I'm
> > wondering how to serialize a perl object in a .gz file.
>
> Uh, gzip the data once you've serialized it? You can use
> IO::Compress::Gzip to do the compression for you, and you can use
> Storable::freeze rather than Storable::store to avoid the temporary file
> if your data's small enough.
Will there be roughly the same level of compression rate if I store
the freezed object compared with that I gzip the compress the file
stored without freeze?
I got the following error. Would you please let me know what I am
wrong?
> cat freeze.pl
#!/usr/bin/perl
use strict;
use warnings;
use Storable;
use Data::Dumper;
my %hash =3D (
a=3D>[1,2,3],
b=3D>['x','y','z'],
);
my $serialized =3D freeze \%hash;
store \$serialized, "freeze.pdata";
print Dumper(\$serialized);
> ./freeze.pl
Backslash found where operator expected at ./freeze.pl line 14, near
"freeze \"
(Do you need to predeclare freeze?)
syntax error at ./freeze.pl line 14, near "freeze \"
Execution of ./freeze.pl aborted due to compilation errors.
------------------------------
Date: Thu, 31 Dec 2009 00:52:45 -0800 (PST)
From: kath <nitte.sudhir@gmail.com>
Subject: Re: How to serialize a perl object in a .gz file
Message-Id: <e1b8ca9d-d8a3-4177-a439-c93750271ff2@21g2000yqj.googlegroups.com>
On Dec 30, 7:26 pm, Peng Yu <pengyu...@gmail.com> wrote:
> On Dec 30, 5:54 pm, Ben Morrow <b...@morrow.me.uk> wrote:
>
> > Quoth Peng Yu <pengyu...@gmail.com>:
>
> > >http://en.wikipedia.org/wiki/Serialization#Perl
>
> > > The following example store the object in an unzipped file. I'm
> > > wondering how to serialize a perl object in a .gz file.
>
> > Uh, gzip the data once you've serialized it? You can use
> > IO::Compress::Gzip to do the compression for you, and you can use
> > Storable::freeze rather than Storable::store to avoid the temporary file
> > if your data's small enough.
>
> Will there be roughly the same level of compression rate if I store
> the freezed object compared with that I gzip the compress the file
> stored without freeze?
>
> I got the following error. Would you please let me know what I am
> wrong?
>
> > cat freeze.pl
>
> #!/usr/bin/perl
>
> use strict;
> use warnings;
>
> use Storable;
> use Data::Dumper;
>
> my %hash = (
> a=>[1,2,3],
> b=>['x','y','z'],
> );
>
> my $serialized = freeze \%hash;
> store \$serialized, "freeze.pdata";
> print Dumper(\$serialized);
>
> > ./freeze.pl
>
> Backslash found where operator expected at ./freeze.pl line 14, near
> "freeze \"
> (Do you need to predeclare freeze?)
> syntax error at ./freeze.pl line 14, near "freeze \"
> Execution of ./freeze.pl aborted due to compilation errors.
I haven't used 'store' anytime. So i cannot comment on that part. You
last line should be,
print Dumper $serialized;
katharnakh.
------------------------------
Date: Thu, 31 Dec 2009 03:39:10 -0800 (PST)
From: Marc Girod <marc.girod@gmail.com>
Subject: Re: How to serialize a perl object in a .gz file
Message-Id: <073760e2-3f21-4f68-a230-408450c3f78d@o28g2000yqh.googlegroups.com>
On Dec 31, 3:26=A0am, Peng Yu <pengyu...@gmail.com> wrote:
> =A0 =A0 =A0 =A0 (Do you need to predeclare freeze?)
I believe this only means that you need:
use Storable qw(freeze);
Marc
------------------------------
Date: Thu, 31 Dec 2009 14:22:16 +0000
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: How to serialize a perl object in a .gz file
Message-Id: <olou07-gg13.ln1@osiris.mauzo.dyndns.org>
Quoth Peng Yu <pengyu.ut@gmail.com>:
> On Dec 30, 5:54 pm, Ben Morrow <b...@morrow.me.uk> wrote:
> > Quoth Peng Yu <pengyu...@gmail.com>:
> >
> > >http://en.wikipedia.org/wiki/Serialization#Perl
> >
> > > The following example store the object in an unzipped file. I'm
> > > wondering how to serialize a perl object in a .gz file.
> >
> > Uh, gzip the data once you've serialized it? You can use
> > IO::Compress::Gzip to do the compression for you, and you can use
> > Storable::freeze rather than Storable::store to avoid the temporary file
> > if your data's small enough.
>
> Will there be roughly the same level of compression rate if I store
> the freezed object compared with that I gzip the compress the file
> stored without freeze?
I don't understand what you mean. How do you store a Perl object in a
file without using Storable?
> my $serialized = freeze \%hash;
> store \$serialized, "freeze.pdata";
No, you don't want to run the data through Storable twice. That's just
a waste of time. To store an uncompressed serialization in a file, you
want
store \%hash, "freeze.pdata";
or
my $serialized = freeze \%hash;
{
open my $OUT, ">:raw", "freeze.pdata"
or die "can't write freeze.pdata: $!";
print $OUT $serialized;
close $OUT or die "writing freeze.pdata failed: $!";
}
The second form has the advantage that you can insert other operations,
like IO::Compress::Gzip::gzip, between freezing the data and writing it
to the file.
Ben
------------------------------
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:
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
Back issues are available via anonymous ftp from
ftp://cil-www.oce.orst.edu/pub/perl/old-digests.
#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 2745
***************************************
