[22146] in Perl-Users-Digest
Perl-Users Digest, Issue: 4367 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jan 8 14:06:04 2003
Date: Wed, 8 Jan 2003 11:05:08 -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 Wed, 8 Jan 2003 Volume: 10 Number: 4367
Today's topics:
DBI::do sometimes returns 0 when it should not (mysql)? (Rex Gustavus Adolphus)
Re: Detecting media change/closing of CD tray? <zentara@highstream.net>
Re: file size limits of perl Net::ftp <kenneth.r.ralph@boeing.com>
finding files older than a given date (Charles)
Re: finding files older than a given date <nobull@mail.com>
Re: finding files older than a given date (Tad McClellan)
Re: finding files older than a given date <bongie@gmx.net>
How to track the *.pm files? (niudou)
Re: How to track the *.pm files? (Tad McClellan)
Re: Need help with split news@roaima.freeserve.co.uk
Re: Need to enter to finish perl script <uri@stemsystems.com>
Re: Perl Modules <jeff@vpservices.com>
Re: Perl Modules <goldbb2@earthlink.net>
Re: Perl Modules <bart.lateur@pandora.be>
Re: RE madness <nobull@mail.com>
Re: Reg Expression help <Jodyman@hotmail.com>
Re: Taint check question (Tad McClellan)
tracing the HTTP <skerschhofer@yahoo.de>
Re: using subroutines defined in other scripts <bongie@gmx.net>
Re: using subroutines defined in other scripts <jvandervloet@hotmail.com>
Re: using subroutines defined in other scripts (Helgi Briem)
Re: using subroutines defined in other scripts (Tad McClellan)
Re: using subroutines defined in other scripts <nobull@mail.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 8 Jan 2003 09:36:34 -0800
From: uffesterner@spamhole.com (Rex Gustavus Adolphus)
Subject: DBI::do sometimes returns 0 when it should not (mysql)?
Message-Id: <c70a85ff.0301080936.10f6cdc1@posting.google.com>
Hi
I wonder if anyone else sometimes get 0 returned from a
DBI::do-statement that actually affects a certain number of rows.
The specific database I'm accessing is mysql.
For instance if the table "test_table" contains 4000 records
and I do:
$rows_affected = $db->do("delete from test_table");
then $rows_affected is 0 and there is no records left in the table.
I also seen this happen for update-statements,
that the $rows_affected is 0 although I know records has been updated.
tia
/g
------------------------------
Date: Wed, 08 Jan 2003 12:56:09 -0500
From: zentara <zentara@highstream.net>
Subject: Re: Detecting media change/closing of CD tray?
Message-Id: <4bpo1vshv9baj3cnifhg25l260o1tt7evi@4ax.com>
On Wed, 8 Jan 2003 02:35:04 +0100, "Frank Maas"
<spamfilter@cheiron-it.nl> wrote:
>> Check out http://search.cpan.org
>>
>> POE::Component::CD::Detect
>> Detects CD insertions and provides TOC.
>Hey thanks! Why on earth this did not come up when I tried Randy Kobes'
>search engine... I probably sticked too much to CDROM in stead of simply
>'CD'. The module does not show good in the testresults and POE is a large
>thing to take in, but I will look into this deeper in the morning.
If Poe carries too much extra baggage for you try this one:
http://freshmeat.net/projects/cdde/?topic_id=116%2C146
Cd detect and execute.
------------------------------
Date: Wed, 8 Jan 2003 16:37:10 GMT
From: Ken Ralph <kenneth.r.ralph@boeing.com>
Subject: Re: file size limits of perl Net::ftp
Message-Id: <3E1C53B6.9F82F123@boeing.com>
Have you changed the timeout value & still fail around 10GB?
krr
oe wrote:
>
> Happy new year,
>
> I've a question concerning perl with special regard to Net::FTP. Are
> there any limits in file size ? I want to do ftp->put command of a pipe
> which is the output of a tar command. It works well, but if the tar
> command produces more then 10 GB output, the put command fails. If I do
> it by hand on the linux shell (without piping but with an intermediate
> file) it works well.
>
> Thanks for your answers,
>
> Olli
------------------------------
Date: 8 Jan 2003 09:17:11 -0800
From: schittdip@hotmail.com (Charles)
Subject: finding files older than a given date
Message-Id: <c6e8de31.0301080917.4c20b5b0@posting.google.com>
What I want to do is create a script to run on a windows server that
will recursively go into a directory and delete any files older than a
given time period. For example I would call the script and pass in a
2 for 2 weeks old, and the directory,i.e, d:\stuff. Then the script
should be able to go into all the directories under d:\stuff and
delete all files that are at least 2 weeks old.
I have been searching here and I can extract the date from the file
using stat, but I am not sure how to do the recursion and the date
compare. This may have been asked and answered many times and I
apoligize. But if anyone could point me in the right direction I
would greatly appreciate it.
Thanks,
Charles
------------------------------
Date: 08 Jan 2003 17:51:50 +0000
From: Brian McCauley <nobull@mail.com>
Subject: Re: finding files older than a given date
Message-Id: <u9u1gjo7gp.fsf@wcl-l.bham.ac.uk>
schittdip@hotmail.com (Charles) writes:
> What I want to do is create a script to run on a windows server that
> will recursively go into a directory
File::Find
> and delete any files
unlink
> older than a given time period.
-M
> I have been searching here and I can extract the date from the file
> using stat, but I am not sure how to do the recursion
File::Find
> and the date compare.
Since dates are represented as the number of seconds since some origin
you can manipulate them with the normal numeric operators.
> This may have been asked and answered many times and I apoligize.
Usenet search engines exist. A popular one can be found at
groups.google.com.
> But if anyone could point me in the right direction I
> would greatly appreciate it.
The File::Find module, the -M operator and the unlink() function.
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Wed, 8 Jan 2003 12:05:11 -0600
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: finding files older than a given date
Message-Id: <slrnb1oq2n.lkd.tadmc@magna.augustmail.com>
Charles <schittdip@hotmail.com> wrote:
> What I want to do is create a script to run on a windows server that
> will recursively go into a directory and delete any files older than a
> given time period.
I suggest making a very good backup before trying this code!
(or, change the unlink() to a print():
print "I would have deleted the '$File::Find::name' file\n";
)
----------------------------------
# untested!
use File::Find;
my $days = 14;
find( \&unwanted, 'd:/stuff');
sub unwanted {
return unless -f; # delete only plain files
return unless -M > $days;
unlink or warn "could not delete '$File::Find::name' file\n";
}
----------------------------------
You can view the module's docs with:
perldoc File::Find
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 08 Jan 2003 19:09:10 +0100
From: "Harald H.-J. Bongartz" <bongie@gmx.net>
Subject: Re: finding files older than a given date
Message-Id: <1229283.1SVyiM21Ks@nyoga.dubu.de>
Charles wrote:
> What I want to do is create a script to run on a windows server that
> will recursively go into a directory and delete any files older than a
> given time period. For example I would call the script and pass in a
> 2 for 2 weeks old, and the directory,i.e, d:\stuff. Then the script
> should be able to go into all the directories under d:\stuff and
> delete all files that are at least 2 weeks old.
>
> I have been searching here and I can extract the date from the file
> using stat,
I think in this case, the -M function will be easier to handle.
See perldoc -f -X.
> but I am not sure how to do the recursion
perldoc File::Find
> and the date
> compare.
unlink $file or die "cannot unlink $file: $!" if -M $file > 7*$weeks;
Ciao,
Harald
--
Harald H.-J. Bongartz <bongie@gmx.net>
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
If you ate pasta and antipasta, would you still be hungry?
------------------------------
Date: 8 Jan 2003 08:29:38 -0800
From: niudou@hotmail.com (niudou)
Subject: How to track the *.pm files?
Message-Id: <324590c7.0301080829.4c61e74a@posting.google.com>
Could you please tell how to get a value of a scalar variant in a *.pm
file when debugging? Why the "print" can't show the result what I
want?
Thanks a lot!
------------------------------
Date: Wed, 8 Jan 2003 10:57:45 -0600
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: How to track the *.pm files?
Message-Id: <slrnb1om49.ld7.tadmc@magna.augustmail.com>
niudou <niudou@hotmail.com> wrote:
> Could you please tell how to get a value of a scalar variant in a *.pm
> file when debugging?
^^^^^^^^^
(I assume that that does not mean "in the debugger"...)
It depends on what type of variable it is.
If it is a lexical variable, then it cannot be done from outside
of the .pm file.
If it is a dynamic variable, then use the fully-qualified name
for the variable.
If you don't know the difference between the 2 types of variables, then:
perldoc -q lexical
and
"Coping with Scoping":
http://perl.plover.com/FAQs/Namespaces.html
For instance, if My/Module.pm has:
our $var;
in it, then you can examine its value thus:
print "$My::Module::var\n";
ie. you put the module's name between the dollar sign and
the variable name.
> Why the "print"
What print()? You have not shown any print()s...
> can't show the result what I
> want?
I dunno, you've not given us enough information to answer
that part of the question.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 8 Jan 2003 16:49:31 +0000
From: news@roaima.freeserve.co.uk
Subject: Re: Need help with split
Message-Id: <rqkhva.if8.ln@moldev.cmagroup.co.uk>
Jodyman <Jodyman@hotmail.com> wrote:
> This is true. In my 28+ years programming, I've never used \ in a
> filename.
Nor me (until yesterday). But that's not the point.
> Your filename might even crash the basename module running under
> unix/linux. I haven't tried it.
The basename module returns the correct value; your code doesn't. I guess
you're happy to live with the potential problems that may come back to
haunt you when someone else /does/ use backslashes in their filenames.
Regards,
Chris
--
@s=split(//,"Je,\nhn ersloak rcet thuarP");$k=$l=@s;for(;$k;$k--){$i=($i+1)%$l
until$s[$i];$c=$s[$i];print$c;undef$s[$i];$i=($i+(ord$c))%$l}
------------------------------
Date: Wed, 08 Jan 2003 16:13:42 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Need to enter to finish perl script
Message-Id: <x7y95voc0a.fsf@mail.sysarch.com>
>>>>> "BM" == Brian McCauley <nobull@mail.com> writes:
BM> Uri Guttman <uri@stemsystems.com> writes:
cz> if ($nzr > 0) {
cz> "0"x$nzr . ($val);
cz> }
cz> else {
cz> $val;
cz> }
>>
>> gack! default returning a val from an if/else is horrible.
BM> You are free to dislike the use of if/else in a non-void context but I
BM> beg to differ. I quite like the construct. If I have...
BM> EXPR ? EXPR : EXPR
BM> ...in a script and I find the expressions are getting too long to be
BM> easily readable I'll often re-write it as...
BM> do {
BM> if ( EXPR ) {
BM> EXPR;
BM> } else {
BM> EXPR;
BM> }
BM> }
in the given case which is in a sub using explicit returns is much
better:
if ( FOO ) {
return 'BAR' ;
}
return 'BAZ' ;
or even better:
return 'BAR' if FOO ;
return 'BAZ' ;
do blocks don't have an early return mechanism which is a minor
problem. i don't use them often anyhow. i possibly would design such a
long ?: expression to be inside a sub where i could use return. IMO
using subs (where needed) to make flow control cleaner is a very good
idea.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
----- Stem and Perl Development, Systems Architecture, Design and Coding ----
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
Damian Conway Perl Classes - January 2003 -- http://www.stemsystems.com/class
------------------------------
Date: Wed, 08 Jan 2003 09:14:12 -0800
From: Jeff Zucker <jeff@vpservices.com>
Subject: Re: Perl Modules
Message-Id: <3E1C5C64.3010709@vpservices.com>
Bart Lateur wrote:
> I think they're currently working on a Pure Perl version for where
> that's not an option, see DBI::PurePerl on CPAN.
It's part of the standard DBI distribution.
--
Jeff
------------------------------
Date: Wed, 08 Jan 2003 13:08:18 -0500
From: Benjamin Goldberg <goldbb2@earthlink.net>
Subject: Re: Perl Modules
Message-Id: <3E1C6912.53785C29@earthlink.net>
Bart Lateur wrote:
>
> Jason Singleton wrote:
>
> >Is it possible to use modules with out installing them?
>
> With Pure Perl modules, yes. Just copy the modules' source to the
> proper location in a directory tree visible in @INC. Watch out for
> modules that depend on AutoSplit. You'll have to remove the dependency
> on AUTOLOAD/AutoLoader, or split it up yourself. You need to be
> knowing what you're doing, then.
Modifying the module to depend on SelfLoader might be better.
Or even removing the __END__ tag, so as to make the autoloaded subs into
normally loaded subs.
--
$..='(?:(?{local$^C=$^C|'.(1<<$_).'})|)'for+a..4;
$..='(?{print+substr"\n !,$^C,1 if $^C<26})(?!)';
$.=~s'!'haktrsreltanPJ,r coeueh"';BEGIN{${"\cH"}
|=(1<<21)}""=~$.;qw(Just another Perl hacker,\n);
------------------------------
Date: Wed, 08 Jan 2003 18:07:46 GMT
From: Bart Lateur <bart.lateur@pandora.be>
Subject: Re: Perl Modules
Message-Id: <c5qo1vss169o23ootm91fnid9bu2cqis80@4ax.com>
Benjamin Goldberg wrote:
>Bart Lateur wrote:
>> Watch out for
>> modules that depend on AutoSplit. You'll have to remove the dependency
>> on AUTOLOAD/AutoLoader, or split it up yourself. You need to be
>> knowing what you're doing, then.
>Or even removing the __END__ tag, so as to make the autoloaded subs into
>normally loaded subs.
which is exactly what I mean by "removing the dependency on
AUTOLOAD/AutoLoader. But I didn't say it with that many words.
--
Bart.
------------------------------
Date: 08 Jan 2003 17:58:19 +0000
From: Brian McCauley <nobull@mail.com>
Subject: Re: RE madness
Message-Id: <u9ptr7o75w.fsf@wcl-l.bham.ac.uk>
andrej hocevar <ah@siol.net> writes:
> I was wondering whether there's a way of saying "neither/nor"
> instead of "either/or" with a positive match. I've been playing
> with these:
>
> !~ /^(?:red|blue)$/
>
> which works -- it means not the word "red" or "blue".
> But then, is there a way of writing it similar to this (which
> doesn't work)?
>
> =~ /^[^(?:red|blue)]$/
> What is wrong with the above?
What do you think [] do in regex? Compare this to what the manuals
say they do.
> Maybe with the "(?!)" construct?
You mean
=~ /^(?!red$)(?!blue$)/
> How does it work?
A description of what the (?!) construct does can be found in the
perlre manual.
If you have any difficulty understanding what it says then please be
very explicit about what part you don't understand. No quick,
off-the-cuff, explaination in the newsgroup is likely to be better
than the manual.
Besides, if the manual is unclear, then by telling us how it unclear
we get a chance to fix it.
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Wed, 08 Jan 2003 17:13:10 GMT
From: "Jodyman" <Jodyman@hotmail.com>
Subject: Re: Reg Expression help
Message-Id: <G_YS9.20596$134.2183465@newsread1.prod.itd.earthlink.net>
"Jodyman" <Jodyman@hotmail.com> wrote in message news:kUTS9.22670
> It was a joke. If you read the original message, obviously
> the OP hadn't read any manuals and posted a question without
> thinking. tr/+/ /; or s/+/ /g; was the easiest and correct answers.
oops, s/\+/ /g;
Jody
------------------------------
Date: Wed, 8 Jan 2003 10:43:09 -0600
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Taint check question
Message-Id: <slrnb1ol8t.l5f.tadmc@magna.augustmail.com>
henrik nilsson <md0nilhe@mdstud.DIESPAMchalmers.se> wrote:
>
> Thanks for your comments. Here's what I meant:
>
> The user pastes data into a html field. I fetch it, inspect / correct
> it, and save it to the file INFILE (which *must* have that name).
^^^^^^^
Oh. So you are _writing_ to the file.
Your OP said nothing about writing, only reading.
> Furthermore, the program I refer to reads ONLY from its own directory,
> no absolute or relative paths to outside the directory are accepted.
>
> Hence, there must be a file called INFILE in the directory where the
> program is. It reads the file and saves the processed data as OUTFILE.
>
> If I have more than user at the same time, the file INFILE will be
> overwritten and data will be lost, and the same for OUTFILE.
>
> I still think that I will need to create a separate directory for each
> instance of the script, and copy and the program there.
OIC. (Oh, I see).
Given your (somewhat strange) constraints, it looks like you do
need a bunch of copies of the program files.
> And that's where I get taint check problems.
Let pull back in the problem:
>> The taint check of course freaks out and asks me do the PATH thing.
Then do the PATH thing.
>> I
>> assume that I should indeed not reset PATH every time I run the script,
Why not?
>> especially not if the script is run several times in parallell.
I think maybe you misunderstand what PATH is for.
It has nothing to do with where your Perl program file is.
It has nothing to do with where your data files are.
It has to do with where _external programs_ that you call are located.
If your Perl program does not call any external programs, then
you can set PATH to nothing in each copy of your program:
$ENV{PATH} = '';
Does your Perl program call external programs?
If so, then put the appropriate dirs into PATH (it will be the
same for every copy) or set PATH empty and use absoute paths
("/bin/ls" instead of just "ls") so that PATH will never
even be used.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 8 Jan 2003 19:44:14 +0100
From: "Sascha Kerschhofer" <skerschhofer@yahoo.de>
Subject: tracing the HTTP
Message-Id: <avhrhv$plu$1@news.mch.sbs.de>
Hi,
How can I log the communication between my web-browser and any webserver? I
am interested in the
POST /download/xy.php HTTP/1.1
... stuff.
Or is there any software that does that for me (Windows Software)?
Thank you.
Sascha
------------------------------
Date: Wed, 08 Jan 2003 17:30:09 +0100
From: "Harald H.-J. Bongartz" <bongie@gmx.net>
Subject: Re: using subroutines defined in other scripts
Message-Id: <1070662.o1beekKht0@nyoga.dubu.de>
joeri wrote:
[...]
> What can I say. I apologise.
>
> J.
>
>
> "Tad McClellan" <tadmc@augustmail.com> wrote in message
> news:slrnb1ofr6.kqb.tadmc@magna.augustmail.com...
[yet another Fullquote deleted]
*ROTFL*
You still don't get it, do you?
Isnt' it some work to copy the original message *twice*? ;-)
Ciao,
Harald
You owe the Oracle a cup of tea and a new keyboard.
--
Harald H.-J. Bongartz <bongie@gmx.net>
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Interesting Error Messages #4:
Press Esc key to reboot Universe, or any other key to continue...
------------------------------
Date: Wed, 08 Jan 2003 16:39:51 GMT
From: "joeri" <jvandervloet@hotmail.com>
Subject: Re: using subroutines defined in other scripts
Message-Id: <rvYS9.1243$ym5.28@afrodite.telenet-ops.be>
> > "Tad McClellan" <tadmc@augustmail.com> wrote in message
> > news:slrnb1ofr6.kqb.tadmc@magna.augustmail.com...
> [yet another Fullquote deleted]
>
> *ROTFL*
> You still don't get it, do you?
> Isnt' it some work to copy the original message *twice*? ;-)
>
> Ciao,
> Harald
>
> You owe the Oracle a cup of tea and a new keyboard.
Is this how it is supposed to be done? Forgive me for my ignorance.
J.
------------------------------
Date: Wed, 08 Jan 2003 16:40:30 GMT
From: helgi@decode.is (Helgi Briem)
Subject: Re: using subroutines defined in other scripts
Message-Id: <3e1c5417.394527069@news.cis.dfn.de>
On Wed, 08 Jan 2003 15:41:56 GMT, "joeri"
<jvandervloet@hotmail.com> wrote:
>> >> > I'm not sure what you mean by TOFU.
>> http://www.tuxedo.org/~esr/jargon/html/entry/TOFU.html
>> >> Text On-top. Full-quote under. i.e. putting the entirity of the
<SNIP ENORMOUS FU POST>
You are still not getting it, are you?
You have stopped top-posting, but you are still
full-quoting page after page of text that you
are *NOT* responding to. Stop doing it!
--
Regards, Helgi Briem
helgi AT decode DOT is
------------------------------
Date: Wed, 8 Jan 2003 10:50:53 -0600
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: using subroutines defined in other scripts
Message-Id: <slrnb1olnd.ld7.tadmc@magna.augustmail.com>
joeri <jvandervloet@hotmail.com> wrote:
>
>> > "Tad McClellan" <tadmc@augustmail.com> wrote in message
>> > news:slrnb1ofr6.kqb.tadmc@magna.augustmail.com...
>> [yet another Fullquote deleted]
>>
>> *ROTFL*
>> You still don't get it, do you?
>> Isnt' it some work to copy the original message *twice*? ;-)
>>
>> Ciao,
>> Harald
>>
>> You owe the Oracle a cup of tea and a new keyboard.
>
> Is this how it is supposed to be done?
Now you've got it!
> Forgive me for my ignorance.
Read all about it:
http://www.geocities.com/nnqweb/nquote.html
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 08 Jan 2003 17:46:00 +0000
From: Brian McCauley <nobull@mail.com>
Subject: Re: using subroutines defined in other scripts
Message-Id: <u9y95vo7qf.fsf@wcl-l.bham.ac.uk>
After several attempts by the regulars to explain TOFU to him "joeri"
<jvandervloet@hotmail.com> writes:
> > > "Tad McClellan" <tadmc@augustmail.com> wrote in message
> > > news:slrnb1ofr6.kqb.tadmc@magna.augustmail.com...
> > [yet another Fullquote deleted]
> >
> > *ROTFL*
> > You still don't get it, do you?
> > Isnt' it some work to copy the original message *twice*? ;-)
> >
> > Ciao,
> > Harald
> >
> > You owe the Oracle a cup of tea and a new keyboard.
>
> Is this how it is supposed to be done?
Very close.
You forgot to include the attribution line for Harald.
You maybe should have trimmed the lines "Ciao, / Harald".
Appart from that, perfect.
> Forgive me for my ignorance.
It was never your ignorance that anyone objected to. It was your
resistance to learning.
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
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.
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 4367
***************************************
