[28233] in Perl-Users-Digest
Perl-Users Digest, Issue: 9597 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Aug 13 09:05:43 2006
Date: Sun, 13 Aug 2006 06:05: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 Sun, 13 Aug 2006 Volume: 10 Number: 9597
Today's topics:
Re: How to make image that show some web page? <nobull67@gmail.com>
Re: Implicit iterator variable $_ changing to ### upon <bik.mido@tiscalinet.it>
Re: is it possible to efficiently read a large file? xhoster@gmail.com
Re: is it possible to efficiently read a large file? <Mark.Seger@hp.com>
Re: is it possible to efficiently read a large file? <Mark.Seger@hp.com>
Re: is it possible to efficiently read a large file? <benmorrow@tiscali.co.uk>
new CPAN modules on Sun Aug 13 2006 (Randal Schwartz)
Re: Parsing text to array <notvalid@email.com>
Re: Proposal: extending perldoc -f <benmorrow@tiscali.co.uk>
Re: Segmentation fault (core dumped) <joe@inwap.com>
Re: Segmentation fault (core dumped) <benmorrow@tiscali.co.uk>
system command won't let go rallabs@adelphia.net
Re: The assignment of command output to an array hangs. <nobull67@gmail.com>
time manipulation help mike888@berlin.com
Re: time manipulation help usenet@DavidFilmer.com
Re: time manipulation help <bik.mido@tiscalinet.it>
Re: time manipulation help <tintin@invalid.invalid>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 13 Aug 2006 03:12:26 -0700
From: "Brian McCauley" <nobull67@gmail.com>
Subject: Re: How to make image that show some web page?
Message-Id: <1155463946.262171.247480@i3g2000cwc.googlegroups.com>
Brian McCauley wrote:
> Using Perl to remotely control "mechanise" an existing graphical web
> browser is a well established technique.
Shortly after I posted that I was proof-reading the YAPC::Europe::2006
abstracts and I cam upon..
http://www.birmingham2006.com/cgi-bin/yapc.pl?act=talk-item&talkid=79
------------------------------
Date: 13 Aug 2006 11:35:21 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: Implicit iterator variable $_ changing to ### upon variable assignment?
Message-Id: <h7rtd2pvjkaeh1qgkgirudikge2g857hjo@4ax.com>
On 12 Aug 2006 10:09:53 -0700, "Derek Basch" <dbasch@yahoo.com> wrote:
>I guess I should read up more on the differences between a package
>stash and blessed hash references as objects. I had been thinking they
>were the same thing but apparently they are not.
Oh, no, no...
#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;
{
package Foo;
sub new {
bless { foo => 'bar' }, shift;
}
}
my $obj=Foo->new;
print Dumper { %$obj }, \%Foo::;
__END__
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: 13 Aug 2006 01:54:55 GMT
From: xhoster@gmail.com
Subject: Re: is it possible to efficiently read a large file?
Message-Id: <20060812220457.513$og@newsreader.com>
Mark Seger <Mark.Seger@hp.com> wrote:
> I'm trying to read a 3GB file efficiently. If I do with a benchmarking
> tool, I use about 6-8% of the cpu and can read it in about 44 seconds -
> obviously the time if very closely tied to the type of disk, but I'm
> including that for reference.
What kind of benchmarking tool is it? For benchmarking raw disks, or
the OS FS, or what? It may be using methods that are simply unavailable to
a general purpose language like perl.
>
> When I do the same thing in perl using:
>
> $reclen=1024*128;
> while ($bytes=sysread(FILE, $buffer, $reclen))
> {
> $total+=$bytes;
> }
>
> it takes just under 60 seconds
For me, it takes 7 seconds to read 4e9 bytes with your code and
buffer size. If I make it read from /dev/zero rather than a real
file, then it takes less than 0.5 seconds. Since Perl doesn't know
that it is reading from /dev/zero, I would have to assume that at least
6.5 of those 7 seconds for the real files are taken up by things outside
perl's control.
> and used 25-30% of the cpu.
I don't think CPU reporting in these cases is very meaningful. Every
monitoring tool seems to use a different method for how to attribute time
between user, system, idle, IO-wait, etc.
> I'm sure
> there is a lot of data movement between buffers and am wondering if
> there is some way to avoid this. I'm guessing that perhaps perl is
> generating a new instance of $buffer every pass through the loop and if
> so that would involve mallocs() and frees() every pass, which I'd like
> to avoid if possible.
Since I can't replicate your poor performance, I can't really investigate
it. But I doubt any of this stuff is worth worrying about. I'd look at the
systems level, rather than at perl.
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: Sat, 12 Aug 2006 22:24:10 -0400
From: Mark Seger <Mark.Seger@hp.com>
Subject: Re: is it possible to efficiently read a large file?
Message-Id: <44de8d4a$1@usenet01.boi.hp.com>
John Bokma wrote:
> Mark Seger <Mark.Seger@hp.com> wrote:
>
>
>>I'm trying to read a 3GB file efficiently. If I do with a benchmarking
>>tool, I use about 6-8% of the cpu and can read it in about 44 seconds -
>>obviously the time if very closely tied to the type of disk, but I'm
>>including that for reference.
>>
>>When I do the same thing in perl using:
>>
>>$reclen=1024*128;
>>while ($bytes=sysread(FILE, $buffer, $reclen))
>>{
>> $total+=$bytes;
>>}
>>
>>it takes just under 60 seconds and used 25-30% of the cpu. I'm sure
>>there is a lot of data movement between buffers and am wondering if
>>there is some way to avoid this. I'm guessing that perhaps perl is
>>generating a new instance of $buffer every pass through the loop and if
>>so that would involve mallocs() and frees() every pass, which I'd like
>>to avoid if possible.
>
>
> you might want to increase reclen, since 128 kbytes sounds like an
> extremely small buffer to me.
>
a 128kb buffer is more than enough. remember, this can be done directly
from C very efficiently. in any event I did try with a 1M buffer and no
difference.
-mark
------------------------------
Date: Sat, 12 Aug 2006 22:26:43 -0400
From: Mark Seger <Mark.Seger@hp.com>
To: "John W. Krahn" <krahnj@telus.net>
Subject: Re: is it possible to efficiently read a large file?
Message-Id: <44DE8DE3.4040805@hp.com>
John W. Krahn wrote:
> Mark Seger wrote:
>
>>I'm trying to read a 3GB file efficiently. If I do with a benchmarking
>>tool, I use about 6-8% of the cpu and can read it in about 44 seconds -
>>obviously the time if very closely tied to the type of disk, but I'm
>>including that for reference.
>>
>>When I do the same thing in perl using:
>>
>>$reclen=1024*128;
>>while ($bytes=sysread(FILE, $buffer, $reclen))
>>{
>> $total+=$bytes;
>>}
>>
>>it takes just under 60 seconds and used 25-30% of the cpu. I'm sure
>>there is a lot of data movement between buffers and am wondering if
>>there is some way to avoid this. I'm guessing that perhaps perl is
>>generating a new instance of $buffer every pass through the loop and if
>>so that would involve mallocs() and frees() every pass, which I'd like
>>to avoid if possible.
>
>
> Are you using open() or sysopen() to open the file? sysread() "bypasses
> buffered IO" but your $reclen may be too large (or too small) for efficient
> IO. Your example appears to use $main::buffer which means that the same
> variable is used for each read however I don't know whether Perl reallocates
> memory for each read. You could use something like strace(1) to determine
> exactly what system calls the program is making.
I'm usong open(), but I'll give sysopen() a whirl in the morning. I
also like the idea abot strace. my fear is the data is being read into
one buffer and storage is getting allocated for $buffer on each call and
then moved to it. the challenge is, is there a way to read directly
into the $buffer. maybe strace() will provide some clues...
-mark
------------------------------
Date: Sun, 13 Aug 2006 08:49:57 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: is it possible to efficiently read a large file?
Message-Id: <5623r3-lsf.ln1@osiris.mauzo.dyndns.org>
Quoth Mark Seger <Mark.Seger@hp.com>:
> John W. Krahn wrote:
>
> > Are you using open() or sysopen() to open the file? sysread() "bypasses
> > buffered IO" but your $reclen may be too large (or too small) for efficient
> > IO. Your example appears to use $main::buffer which means that the same
> > variable is used for each read however I don't know whether Perl reallocates
> > memory for each read. You could use something like strace(1) to determine
> > exactly what system calls the program is making.
>
> I'm usong open(), but I'll give sysopen() a whirl in the morning. I
> also like the idea abot strace. my fear is the data is being read into
> one buffer and storage is getting allocated for $buffer on each call and
> then moved to it. the challenge is, is there a way to read directly
> into the $buffer. maybe strace() will provide some clues...
open/sysopen should make no difference. To preallocate a buffer, create
a long string and overwrite bits of it with substr or directly with
sysread. You have to do your own buffer manglement as in C, of course,
but that's how you get efficiency.
Ben
--
And if you wanna make sense / Whatcha looking at me for? (Fiona Apple)
* benmorrow@tiscali.co.uk *
------------------------------
Date: Sun, 13 Aug 2006 04:42:08 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Sun Aug 13 2006
Message-Id: <J3x6E8.99o@zorch.sf-bay.org>
The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN). You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.
Authen-Passphrase-0.002
http://search.cpan.org/~zefram/Authen-Passphrase-0.002/
hashed passwords/passphrases as objects
----
Bundle-RT-0.030601
http://search.cpan.org/~rspier/Bundle-RT-0.030601/
CPAN Bundle for RT Dependencies
----
Class-MOP-0.32
http://search.cpan.org/~stevan/Class-MOP-0.32/
A Meta Object Protocol for Perl 5
----
Class-Mix-0.001
http://search.cpan.org/~zefram/Class-Mix-0.001/
dynamic class mixing
----
Crypt-CBC-2.19
http://search.cpan.org/~lds/Crypt-CBC-2.19/
Encrypt Data with Cipher Block Chaining Mode
----
Crypt-Eksblowfish-0.001
http://search.cpan.org/~zefram/Crypt-Eksblowfish-0.001/
the Eksblowfish block cipher
----
Date-Biorhythm-1.2
http://search.cpan.org/~beppu/Date-Biorhythm-1.2/
calculate biorhythms
----
Device-Gsm-1.44
http://search.cpan.org/~cosimo/Device-Gsm-1.44/
Perl extension to interface GSM phones / modems
----
IO-Socket-Multicast-1.05
http://search.cpan.org/~lds/IO-Socket-Multicast-1.05/
Send and receive multicast messages
----
Locale-Maketext-Simple-0.17
http://search.cpan.org/~audreyt/Locale-Maketext-Simple-0.17/
Simple interface to Locale::Maketext::Lexicon
----
Object-Accessor-0.21
http://search.cpan.org/~kane/Object-Accessor-0.21/
----
PAR-0.951
http://search.cpan.org/~smueller/PAR-0.951/
Perl Archive Toolkit
----
POE-0.3601
http://search.cpan.org/~rcaputo/POE-0.3601/
portable multitasking and networking framework for Perl
----
POE-Component-DirWatch-Object-0.03
http://search.cpan.org/~groditi/POE-Component-DirWatch-Object-0.03/
POE directory watcher object
----
SAP-Rfc-1.45
http://search.cpan.org/~piers/SAP-Rfc-1.45/
SAP RFC - RFC Function calls against an SAP R/3 System
----
Text-Same-0.05
http://search.cpan.org/~kim/Text-Same-0.05/
Look for similarities between files or arrays
----
Wiki-Toolkit-Plugin-Diff-0.11
http://search.cpan.org/~dom/Wiki-Toolkit-Plugin-Diff-0.11/
format differences between two Wiki::Toolkit pages
----
Wx-App-Mastermind-0.01
http://search.cpan.org/~mbarbon/Wx-App-Mastermind-0.01/
a nontrivial example of wxPerl threads
----
XML-Atom-Stream-0.08
http://search.cpan.org/~miyagawa/XML-Atom-Stream-0.08/
A client interface for AtomStream
If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.
This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
http://www.stonehenge.com/merlyn/LinuxMag/col82.html
print "Just another Perl hacker," # the original
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Sun, 13 Aug 2006 04:21:53 GMT
From: Ala Qumsieh <notvalid@email.com>
Subject: Re: Parsing text to array
Message-Id: <BNxDg.4987$%j7.4785@newssvr29.news.prodigy.net>
Ben Morrow wrote:
> Quoth Ala Qumsieh <notvalid@email.com>:
>>The worst in what sense? And compared to what?
>>It seems to me to be much easier to comprehend by someone else reading
>>the code,
>
>
> ...who doesn't know Perl at all. If you're going to code for people like
> that you might as well give up.
Theoretically, I agree. Unfortunately, that is not the case. Most people
who learn Perl don't care about learning it inside out like you do, and
this is well evident from all the posts in this newsgroup. They just
want to scratch an itch and move on. I personally work with a lot of
people that fall into this category, and sometimes resort to more
verbose coding to aid comprehension (if I can't then I make sure to
document it properly).
>>as compared with Anno's map() solution.
>
>
> Which is entirely standard Perl. Not understanding map is nearly as bad
> as not understanding hashes: it is a fundamental part of Perl.
The OP admitted he didn't know about map(). You don't need to know about
map() to code Perl, and people on this newsgroup need to accept that.
--Ala
------------------------------
Date: Sun, 13 Aug 2006 05:12:48 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: Proposal: extending perldoc -f
Message-Id: <0fl2r3-nod.ln1@osiris.mauzo.dyndns.org>
Quoth "John W. Krahn" <krahnj@telus.net>:
> Ben Morrow wrote:
> >
> > OK, I've done up a patch which adds the following entries:
> >
> > Compound statements
> > if unless else elsif
> > for foreach
> > while until
>
> continue
continue's already there in blead, as part of the new given/when switch
stuff (it deals with the current uses, with a ref to perlsyn, as well).
> > Operators that look like keywords
> > and or xor not err
> > eq ne lt le gt ge
> > x
>
> cmp
Good catch: thank you :).
Ben
--
And if you wanna make sense / Whatcha looking at me for? (Fiona Apple)
* benmorrow@tiscali.co.uk *
------------------------------
Date: Sat, 12 Aug 2006 19:14:17 -0700
From: Joe Smith <joe@inwap.com>
Subject: Re: Segmentation fault (core dumped)
Message-Id: <Wd6dnXtaTse-FkPZnZ2dnUVZ_tKdnZ2d@comcast.com>
ekilada wrote:
> Hi,
> Using Perl, when I try to open a 1.8G file for reading, I get a
> 'Segmentation fault (core dumped)' error.
Are you using a version of perl that was compiled for large file support?
perl -V | egrep '64|large'
osname=cygwin, osvers=1.5.18(0.13242), archname=cygwin-thread-multi-64int
config_args='-de -Dmksymlinks -Duse64bitint -Dusethreads -Uusemymalloc -Doptimize=-O3 -Dman3ext=3pm -Dusesitecustomize'
useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
use64bitint=define use64bitall=undef uselongdouble=undef
Compile-time options: MULTIPLICITY USE_ITHREADS USE_64_BIT_INT
Programs that are not aware of largefiles (such as 'wget') tend to
get a segmentation fault in the STDIO library after outputting
more than 2 or 4GB.
-Joe
------------------------------
Date: Sun, 13 Aug 2006 05:18:26 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: Segmentation fault (core dumped)
Message-Id: <ipl2r3-nod.ln1@osiris.mauzo.dyndns.org>
Quoth Joe Smith <joe@inwap.com>:
>
> perl -V | egrep '64|large'
> osname=cygwin, osvers=1.5.18(0.13242), archname=cygwin-thread-multi-64int
> config_args='-de -Dmksymlinks -Duse64bitint -Dusethreads -Uusemymalloc
> -Doptimize=-O3 -Dman3ext=3pm -Dusesitecustomize'
> useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
> use64bitint=define use64bitall=undef uselongdouble=undef
> Compile-time options: MULTIPLICITY USE_ITHREADS USE_64_BIT_INT
Are you aware you can write that (arguably) more simply as
perl -V:'.*large.*|.*64.*'
? Also, I get 34 lines from that, rather than your 5, which is a little
weird... I guess you must be using 5.8.<8...
Ben
--
Joy and Woe are woven fine,
A Clothing for the Soul divine William Blake
Under every grief and pine 'Auguries of Innocence'
Runs a joy with silken twine. benmorrow@tiscali.co.uk
------------------------------
Date: 13 Aug 2006 05:08:22 -0700
From: rallabs@adelphia.net
Subject: system command won't let go
Message-Id: <1155470902.519872.303860@i42g2000cwa.googlegroups.com>
Dear perl experts:
I am having some difficulties with the 'system' command. I am trying
to use it to run a C
program that has already been compiled. If I am at the UNIX command
prompt I can run the program by typing in "~/runsgood.exe". The
program then prompts me for an input file for it to use. It says:
ENTER INPUT FILE NAME WITHOUT .in EXTENSION. and when I obey I get
nothing at the prompt except there will be
a new file in my current directory with the same root as I gave it but
a .out extension. I can also run the program by preparing a file
containing the root name including the path: ~/runsgood.exe<point. The
file "point" is a single
line: ~/directory/root . When I run the program this way I see the
prompt but the program gets its answer from the file "point". The
problem is it doesn't do this from the sys command. Here is the script
I use to try it:
#!/usr/bin/perl -w
use strict;
use CGI::Carp qw(fatalsToBrowser);
use CGI qw(:standard -no_xhtml);
use diagnostics;
my $co = new CGI;
my $newID=cookie('newID');
system "sed s/old/$newID/ point_old >point.$newID";
system "~/runsgood.exe<point.$newID";
print $co->redirect('~/cgi-bin/done.cgi');
and when I run the script here's what appears in a browser window:
ENTER INPUT FILE NAME WITHOUT .in EXTENSION
Status: 302 Moved
Location: ~/cgi-bin/done.cgi
The prompt from runsgood.exe appears, just as it does when I run it
interactively. The program does its job and the output does appear in
my directory as it should, but it cannot get to the last line for some
reason. Does anybody know how to stop this? I was hoping that I would
get the prompt to disappear because I had no header in the script, and
I hoped that it would move on to the script 'done.cgi' but no such
luck. I need to find a way to get to that last script. Thanks for any
help.
mike
------------------------------
Date: 13 Aug 2006 03:51:48 -0700
From: "Brian McCauley" <nobull67@gmail.com>
Subject: Re: The assignment of command output to an array hangs.
Message-Id: <1155466308.549056.71840@b28g2000cwb.googlegroups.com>
kaleem wrote:
> I've found that after the KornShell script completes,
> it becomes defunct (zombie). It means that its parent hasn't waited for
> it.
Right. IIRC readpipe() (aka qx aka `` ) will first wait for an EOF
condition on the FIFO and then wait() for the exit status of the
subprocess.
The symptoms you describe indicate that most likely your subrocess has
performed a fork-off-and-die without remebering to close (or redirect)
STDOUT in the child.
I can trivially reproduce the symptoms you are experiencing thus
$ perl -e'`sleep 30 &`'
The /bin/sleep process is still holding the FIFO open so the /bin/sh
becomes a zombie for 30 seconds.
------------------------------
Date: 12 Aug 2006 23:32:27 -0700
From: mike888@berlin.com
Subject: time manipulation help
Message-Id: <1155450747.077651.60410@i42g2000cwa.googlegroups.com>
Hi,
I am having problem with "use strict;" with hour manipulation.
I want my programs to run certain thing between the 11.15pm until
6.15am.
can someone help me?
thanks alot, i appreciate it.
------------------------------
Date: 13 Aug 2006 00:04:53 -0700
From: usenet@DavidFilmer.com
Subject: Re: time manipulation help
Message-Id: <1155452693.288091.203670@i42g2000cwa.googlegroups.com>
mike888@berlin.com wrote:
> I am having problem with "use strict;" with hour manipulation. I want
> my programs to run certain thing between the 11.15pm until 6.15am.
strict() can only manipulate minutes, not hours. You should "use
warnings()" if you want to manipulate minutes (because warnings are
more time-sensitive).
FWIW, if you ask a bad question, expect a bad answer. See the posting
guidelines for this group for some advice on how to ask a good question
(and get a good answer):
http://www.augustmail.com/~tadmc/clpmisc/clpmisc_guidelines.html
--
David Filmer (http://DavidFilmer.com).
------------------------------
Date: 13 Aug 2006 09:49:11 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: time manipulation help
Message-Id: <56mtd25tbnkkg4sk3r7q1johsu16t40n93@4ax.com>
On 12 Aug 2006 23:32:27 -0700, mike888@berlin.com wrote:
>I am having problem with "use strict;" with hour manipulation.
Huh?!?
>I want my programs to run certain thing between the 11.15pm until
>6.15am.
So may I. In that case, I'd write some code to do so. Looking at
*your* code I suspect that the error has nothing *really* to do with
strict.pm and as usual in these cases is on line 17.
>can someone help me?
With enough help and input on your part, possibly!
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: Sun, 13 Aug 2006 22:18:46 +1200
From: "Tintin" <tintin@invalid.invalid>
Subject: Re: time manipulation help
Message-Id: <44deef53$0$20885$88260bb3@free.teranews.com>
<mike888@berlin.com> wrote in message
news:1155450747.077651.60410@i42g2000cwa.googlegroups.com...
> Hi,
>
> I am having problem with "use strict;" with hour manipulation.
> I want my programs to run certain thing between the 11.15pm until
> 6.15am.
> can someone help me?
> thanks alot, i appreciate it.
The Perl strict module is coded to ensure any scripts that uses it, will
deliberately have problems when used between 11:15pm and 6:15am. This is to
ensure the module is not overused during the period most people are
sleeping.
--
Posted via a free Usenet account from http://www.teranews.com
------------------------------
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 9597
***************************************
