[30293] in Perl-Users-Digest
Perl-Users Digest, Issue: 1536 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon May 12 16:09:42 2008
Date: Mon, 12 May 2008 13:09:08 -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 Mon, 12 May 2008 Volume: 11 Number: 1536
Today's topics:
Re: code written under 5.10.0 to be run under 5.8.8 <uri@stemsystems.com>
Re: code written under 5.10.0 to be run under 5.8.8 <abigail@abigail.be>
Re: Current Time with 5 digits of milliseconds <someone@example.com>
Device::ParallelPort input and output <stuart.gilbert@gmail.com>
Re: Device::ParallelPort input and output <zentara@highstream.net>
Re: Device::ParallelPort input and output <source@netcom.com>
Re: DROP TABLE customers <get@INVALIDbentsys.com>
Re: FAQ 4.14 How can I compare two dates and find the d <jurgenex@hotmail.com>
Re: FAQ 4.14 How can I compare two dates and find the d <benkasminbullock@gmail.com>
Re: FAQ 4.14 How can I compare two dates and find the d <spamtrap@dot-app.org>
Re: FAQ 4.14 How can I compare two dates and find the d <szrRE@szromanMO.comVE>
Re: I need to extract an array from a scalar regex-wise <buellboy@gmail.com>
Re: I need to extract an array from a scalar regex-wise <tzz@lifelogs.com>
Re: I need to extract an array from a scalar regex-wise <uri@stemsystems.com>
Re: None-textual content in tech groups <wgumgfy@gmail.com>
Re: None-textual content in tech groups <wgumgfy@gmail.com>
Re: Perl DBI Module: SQL query where there is space in <szrRE@szromanMO.comVE>
Re: Perl DBI Module: SQL query where there is space in <wgumgfy@gmail.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 12 May 2008 17:00:43 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: code written under 5.10.0 to be run under 5.8.8
Message-Id: <x77idzcv9g.fsf@mail.sysarch.com>
>>>>> "PJH" == Peter J Holzer <hjp-usenet2@hjp.at> writes:
PJH> On 2008-05-12 08:45, Sir Robin <robsku@NO-SPAM-REMOVE-THIS.fiveam.org> wrote:
>> On Sun, 11 May 2008 11:06:21 +0000 (UTC), Ben Bullock
>> <benkasminbullock@gmail.com> wrote:
>>> I believe the new features are all turned off by default anyway, so you
>>> have to "use 5.010;" anyway:
>>
>> On what versions of perl5 do you believe has new features off by default?
PJH> In 5.10 you have to explicitely enable new features by adding a
PJH> "use 5.010;" line.
PJH> It depends on your programming style, of course. For my code it is safe
PJH> to assume that it won't run with Perl 5.6.x or older unless I specially
PJH> took care to make it portable. There were a lot of nifty features added
PJH> in 5.8 and I am using them.
i haven't played with 5.10 yet and 5.8 didn't make major syntax
improvements that i want (though it is the default version i generally
use). but for some of my cpan modules (file::slurp) in particular) i
work hard to keep it backwards compatible all the way back to 5.005 (and
i think even 5.004). this is because it is a very popular module and
there are still too many places where old perl's lurk. i wouldn't do
this for any production code where i know the perl version is recent but
i can't control that when someone uses a module.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.sysarch.com --
----- Perl Code Review , Architecture, Development, Training, Support ------
--------- Free Perl Training --- http://perlhunter.com/college.html ---------
--------- Gourmet Hot Cocoa Mix ---- http://bestfriendscocoa.com ---------
------------------------------
Date: 12 May 2008 18:37:29 GMT
From: Abigail <abigail@abigail.be>
Subject: Re: code written under 5.10.0 to be run under 5.8.8
Message-Id: <slrng2h3j9.fk7.abigail@alexandra.abigail.be>
_
dummy@phony.info (dummy@phony.info) wrote on VCCCLXVII September MCMXCIII
in <URL:news:0gqc245d164jqt67qo69ho0lif7i1f7clv@4ax.com>:
<> I understand that one can specify that a script must be run under a perl
<> version no earlier than a particular version. So, if I say 'use 5.6.0',
<> that code will throw an error if one tries to run it under perl 5.5.0,
<> right?
<>
<> But how about the reverse case?
The reverse case is pretty easy:
BEGIN {
die "Your Perl version is too new" if $] > 5.008008;
}
<> Suppose I write code on my desktop, which has perl 5.10.0 installed, and
<> later transfer that code to a system that only has perl as far as 5.8.8.
<> How can I cause an error on the desktop if I accidentally use any of the
<> new features of 5.10.0, as I would want to do to signal incompatibility?
That's not the reverse case.
<> Is this sort of thing impossible?
Basically, yes. There are some new features that aren't available unless
turned on explicitely, but that isn't the case for features that will not
cause any backwards compatability issues. For instance, there are a ton of
new features when using regexpes, and you get them regardless whether you
use "use feature" or not. Furthermore, bug fixes will be there as well, and
so will any modules that are in 5.010, but not in an older install of Perl.
The best way to avoid accidentily using features that aren't available on
older Perl is to install the oldest Perl you want to develop for, and test
with that.
Abigail
--
perl5.004 -wMMath::BigInt -e'$^V=Math::BigInt->new(qq]$^F$^W783$[$%9889$^F47]
.qq]$|88768$^W596577669$%$^W5$^F3364$[$^W$^F$|838747$[8889739$%$|$^F673$%$^W]
.qq]98$^F76777$=56]);$^U=substr($]=>$|=>5)*(q.25..($^W=@^V))=>do{print+chr$^V
%$^U;$^V/=$^U}while$^V!=$^W'
------------------------------
Date: Mon, 12 May 2008 18:52:02 GMT
From: "John W. Krahn" <someone@example.com>
Subject: Re: Current Time with 5 digits of milliseconds
Message-Id: <ml0Wj.1801$Yp.949@edtnps92>
Peter J. Holzer wrote:
> On 2008-05-12 10:22, John W. Krahn <someone@example.com> wrote:
>> ambarish.mitra@gmail.com wrote:
>>> I need to get the current date-time with milliseconds upto 5 places of
>>> precision.
>>>
>>> That is, 20080512T12094565266 => YYYY MM DD T HH mm SS ms-5 digits
>>>
>>> Here, 65266 is the milli-second with 5 places of precision.
> [...]
>>> Any idea how this can be achieved in Perl?
>> $ perl -le'
>> use Time::HiRes q/gettimeofday/;
>> use POSIX q/strftime/;
>> print substr strftime( q/%Y%m%dT%H%M%S/, localtime ) . ( gettimeofday )[
>> 1 ] . q/00000/, 0, 20;
>> '
>> 20080512T03134231838
>>
>> Of course there is no guarantee that the microseconds will apply to the
>> seconds field that strftime produces.
>
> That's because you are getting the "current time" twice: Once with
> localtime and once with gettimeofday, and then you use the seconds from
> the first call and the microseconds from the second call. Of course the
> seconds may have changed between the calls. If you get the current time
> only once that cannot happen:
>
> my ($seconds, $microseconds) = gettimeofday;
> print strftime( q/%Y%m%dT%H%M%S/, localtime($seconds)),
> sprintf("%05d", $microseconds/10);
>
> (your code also prints the fractional part wrong: 2713 microseconds
> should be printed as 00271 but is printed as 27130)
Thanks Peter, I didn't know how microseconds were represented.
John
--
Perl isn't a toolbox, but a small machine shop where you
can special-order certain sorts of tools at low cost and
in short order. -- Larry Wall
------------------------------
Date: Mon, 12 May 2008 06:10:35 -0700 (PDT)
From: Stu <stuart.gilbert@gmail.com>
Subject: Device::ParallelPort input and output
Message-Id: <3e79afa7-b268-4c61-991c-78f2f912c687@e53g2000hsa.googlegroups.com>
Hi, I've currently got a laptop running Ubuntu Server and Perl 5.8.8.
I've installed the Device::ParallelPort module and I have it working
fairly reliably with ouput. I can make it turn on an LED on some
breadboard, etc.
I am having problems with receiving input through the parallel port
though. I really need to react to something happening. I currently
have pin 12 (Paper-Out/Paper-End) connected to +5V through a switch.
When I press the switch the bit should be set.
Unfortunately I don't actually seem to get what I'm looking for at
all. I'm having no end of trouble finding any example code using this
module for anything but regular 8-pin output.
Has anyone got any tips, bookmarks, or information at all about using
this module for receiving input on the status pins?
Any help would be greatly appreciated.
Regards,
Stuart.
------------------------------
Date: Mon, 12 May 2008 14:17:01 -0400
From: zentara <zentara@highstream.net>
Subject: Re: Device::ParallelPort input and output
Message-Id: <lu1h24l0qehcgntmjsadjcb4j7t11nv730@4ax.com>
On Mon, 12 May 2008 06:10:35 -0700 (PDT), Stu <stuart.gilbert@gmail.com>
wrote:
>Hi, I've currently got a laptop running Ubuntu Server and Perl 5.8.8.
>I've installed the Device::ParallelPort module and I have it working
>fairly reliably with ouput. I can make it turn on an LED on some
>breadboard, etc.
>
>I am having problems with receiving input through the parallel port
>though. I really need to react to something happening. I currently
>have pin 12 (Paper-Out/Paper-End) connected to +5V through a switch.
>When I press the switch the bit should be set.
>
>Unfortunately I don't actually seem to get what I'm looking for at
>all. I'm having no end of trouble finding any example code using this
>module for anything but regular 8-pin output.
>
>Has anyone got any tips, bookmarks, or information at all about using
>this module for receiving input on the status pins?
>
>Any help would be greatly appreciated.
>
>Regards,
>Stuart.
Googling for "parallel port reading" will give some circuits and code
too. Remember to use optoisolators ...... one mistake with your
external circuits can blow out your port and/or motherboard.
Of course, you know that you must have your bios settings for the
parallel port serup for bi-directional transfer? There is ECP and EPP
settings, etc.
The perldoc states that you get status pins with get_status
and the pin looks like number 2 in the second row
1 - 2 Paper-Out - In - Status-5 - No
#untested
use Device::ParallelPort;
my $port = Device::ParallelPort->new();
while (1){
my $val = $port->get_status(5);
if ($val == 1){ print "PaperOut is on\n"; }
select( undef, undef, undef, 0.05); #delay
};
}
You might want to try different bios settings, to get input. You may
also try different numbers for the status.
If you havn't been usuing an optoisolater, you may have blown out
the circuits for that pin. Ouch!! All it takes is a tiny spark of
static.
zentara
--
I'm not really a human, but I play one on earth.
http://zentara.net/japh.html
------------------------------
Date: Mon, 12 May 2008 11:36:12 -0700
From: David Harmon <source@netcom.com>
Subject: Re: Device::ParallelPort input and output
Message-Id: <IvSdnVLTI77XE7XVnZ2dnUVZ_hninZ2d@earthlink.com>
On Mon, 12 May 2008 06:10:35 -0700 (PDT) in comp.lang.perl.misc, Stu
<stuart.gilbert@gmail.com> wrote,
>I am having problems with receiving input through the parallel port
>though. I really need to react to something happening. I currently
>have pin 12 (Paper-Out/Paper-End) connected to +5V through a switch.
>When I press the switch the bit should be set.
These things sometimes work better with a pull-up resistor
(say, 1k ohms) to +5V and the switch to ground.
------------------------------
Date: Mon, 12 May 2008 09:40:52 -0700
From: "Gordon Etly" <get@INVALIDbentsys.com>
Subject: Re: DROP TABLE customers
Message-Id: <68ra8lF2u1ovsU1@mid.individual.net>
Sherman Pendley wrote:
> "Gordon Etly" <get@bentsys.com> writes:
> > I can see how one who can't accept being wrong
> That would be you.
You have yet to prove it. The comments I made on certain people's
postings were precisely because they were in the wrong, and clearly none
of them, including yourself, seems capable of admitting even the
possibility of a fault. Rather than saying something along the lines of
"oh, perhaps it wasn't so right to say that", usually someone like Uri
or yourself jumps in to defend the person I was replying to, as if being
a body guard.
What exactly frightens some of you to just simply say "perhaps
<he/she/I/etc> may have been wrong on <some note>..." ? Why pretend like
commenting on a someone's posting is taboo, when either a) you know the
person being commented upon and feel you mujst protect thme at all
costs, and b) when the commentator is someone you do not like, and thus
the commentee must be protected from them in all costs?
All this leads to, instead of a civil and potentially much shorter
disucssions, instead people like Uri and yourself (sorry if I keep using
him and you, you two have stood out) are the oens who keep turning them
into mini-flame wars, all in the name of tarnishing someone for making a
comment on what another person has posted which you don't agree with.
--
G. Etly
------------------------------
Date: Mon, 12 May 2008 13:34:07 GMT
From: Jrgen Exner <jurgenex@hotmail.com>
Subject: Re: FAQ 4.14 How can I compare two dates and find the difference?
Message-Id: <3vgg24pggp5cdsci0q393pql1j470niton@4ax.com>
Philluminati <Phillip.Ross.Taylor@gmail.com> wrote:
>On May 12, 8:03 am, PerlFAQ Server <br...@stonehenge.com> wrote:
[An FAQ entry]
>
>Honestly, what is the point of posting this? It really doesn't help.
I disagree. In addition to those reasons mentioned in the frist few
lines of each FAQ posting (which are very valid) they also raise
awareness for newcomers about the existance of a large FAQ collection.
Plus it is a nice regular refresher for oldtimers, too.
>It makes the newsgroup harder to read and they are never relevant.
If you personally don't like them it is easy enough to filter them,
either by sender or by "FAQ" at the beginning of the title. That's why
they have a fixed sender and title format.
>It's basically spam. If the person doesn't google the question before
>posting then they sure as hell aren't going to search the group.
No, they won't. And nobody would expect them to, either.
But because 2 FAQ entries are posted daily they will see numerous of
those postings before writing to the NG and hopefully get the idea to
check the FAQ for their problem first.
>unless the correct answer to the question is on the groups active
>discussion page,
What do you mean by "active discussion page"?
> it really is a waste of space and bandwidth.
IMO its a good use of space and bandwith.
jue
------------------------------
Date: Mon, 12 May 2008 13:35:51 +0000 (UTC)
From: Ben Bullock <benkasminbullock@gmail.com>
Subject: Re: FAQ 4.14 How can I compare two dates and find the difference?
Message-Id: <g09h3n$du$1@ml.accsnet.ne.jp>
On Mon, 12 May 2008 02:41:43 -0700, Philluminati wrote:
> Honestly, what is the point of posting this? It really doesn't help.
I find the FAQ posts quite helpful. It is a reminder of the contents for
everyone, and also a chance to check and keep the FAQ information up to
date.
> It
> makes the newsgroup harder to read and they are never relevant.
Actually they are often relevant. There are often questions asked here
(such as the recent thread from today) which are in the Perl FAQ.
> It's basically spam.
That's exaggeration.
> If the person doesn't google the question before posting
> then they sure as hell aren't going to search the group.
Perhaps we can hope for improvement though. If it isn't worth trying to
educate people, then why even bother with the newsgroup?
> So unless the
> correct answer to the question is on the groups active discussion page,
> it really is a waste of space and bandwidth.
Space and bandwidth are quite cheap these days. One five minute Youtube
video probably uses more space and bandwidth than a year of the Perl FAQ.
------------------------------
Date: Mon, 12 May 2008 12:35:44 -0400
From: Sherman Pendley <spamtrap@dot-app.org>
Subject: Re: FAQ 4.14 How can I compare two dates and find the difference?
Message-Id: <m1prrra3a7.fsf@dot-app.org>
Philluminati <Phillip.Ross.Taylor@gmail.com> writes:
> It doesn't matter what reader I use. It is useless junk that is a
> waste of bandwidth. End of story.
You're welcome to your opinion, but really should get over yourself - it's
just your opinion, not the "end of story." You're nobody special.
Many of us were here when the FAQ began to be posted, and witnessed first-
hand the reduction in the number of redundant questions that resulted. You'll
have a difficult time convincing people who used to see the same question
asked six times a day in pre-FAQ days, that auto-posting it is a waste.
sherm--
--
My blog: http://shermspace.blogspot.com
Cocoa programming in Perl: http://camelbones.sourceforge.net
------------------------------
Date: Mon, 12 May 2008 09:54:22 -0700
From: "szr" <szrRE@szromanMO.comVE>
Subject: Re: FAQ 4.14 How can I compare two dates and find the difference?
Message-Id: <g09snv029d0@news4.newsguy.com>
Philluminati wrote:
> On May 12, 8:03 am, PerlFAQ Server <br...@stonehenge.com> wrote:
[...]
>> These postings aim to reduce the number of repeated questions
>> as well as allow the community to review and update the answers.
[...]
> Honestly, what is the point of posting this?
You quoted the answer to your own question. If you don't want to read
them (which would be your loss), then skip and move on to what you
prefer to read.
--
szr
------------------------------
Date: Mon, 12 May 2008 06:10:16 -0700 (PDT)
From: "advice please wireless 802.11 on RH8" <buellboy@gmail.com>
Subject: Re: I need to extract an array from a scalar regex-wise ?
Message-Id: <a655281a-25f7-4548-8560-47706a916259@c58g2000hsc.googlegroups.com>
also not crazy about the hash solution because order may
> > be significant.
>
> He never said "unique", all he said was he wanted to capture the
> occurrences of days of the week in the string into an array. He never
> said their couldn't be duplicates. He _did_ say that "order may be
> significant", which to me is in line with capturing each occurrence of a
> day of the week in the string (as they appear.)
Quite right- I had no uniqueness requirement.. Another reason my hash
solution was wrong. Good instincts on your part.
------------------------------
Date: Mon, 12 May 2008 11:23:36 -0500
From: Ted Zlatanov <tzz@lifelogs.com>
Subject: Re: I need to extract an array from a scalar regex-wise ?
Message-Id: <86iqxj4hkn.fsf@lifelogs.com>
On Sat, 10 May 2008 16:49:05 -0700 "Gordon Etly" <get@bentsys.com> wrote:
GE> my @days = m#((?:mon|tues|wednes|thurs|fri|satur|sun)day)#gi;
I was curious how to do this for any locale, so I came up with:
my @dow_names;
foreach (0..6)
{
push @dow_names, strftime('%A', localtime($_*24*60*60));
}
print Dumper \@dow_names;
which produces, for example,
LANG=bg_BG.utf8 /tmp/t.pl
$VAR1 = [
'сряда',
'четвъртък',
'петък',
'събота',
'неделя',
'понеделник',
'вторник'
];
It should be easy to extend this to the original example. This is
strictly for fun, I know the OP didn't need locales.
Are the days of the week strictly defined to be exactly 7? If yes,
this code should always work. There's got to be some Mayan-French
calendar where it's not true, though...
Ted
------------------------------
Date: Mon, 12 May 2008 16:55:33 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: I need to extract an array from a scalar regex-wise ?
Message-Id: <x7bq3bcvi2.fsf@mail.sysarch.com>
>>>>> "apw81oR" == advice please wireless 802 11 on RH8 <buellboy@gmail.com> writes:
>> > also he got correct answers from other people (including myself) a
apw81oR> Quite right lots of very helpful information thanks to everyone who
apw81oR> contributed. I see some things I did wrong (and some I did right).. I
apw81oR> never knew about 2 different types of parens- capturing and non-
apw81oR> capturing? I'm scoping out Camel now to see what's in there but I've
apw81oR> pretty much read it cover to cover and don't recall those terms..
the camel (which edition?) is not the final reference on perl, the docs
are. you should read perldoc perlrequick, perlretut and perlre (in that
order). from perlre:
"(?:pattern)"
"(?imsx-imsx:pattern)"
This is for clustering, not capturing; it groups subexpres
sions like "()", but doesnt make backreferences as "()"
does. So
@fields = split(/\b(?:a|b|c)\b/)
is like
@fields = split(/\b(a|b|c)\b/)
but doesn't spit out extra fields. It's also cheaper not to
capture characters if you dont need to.
the docs don't use the grouping vs grabbing terminology but many perl
hackers do use those to separate the two similar concepts. perl6
rectifies this by using totally different syntax for the two of them.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.sysarch.com --
----- Perl Code Review , Architecture, Development, Training, Support ------
--------- Free Perl Training --- http://perlhunter.com/college.html ---------
--------- Gourmet Hot Cocoa Mix ---- http://bestfriendscocoa.com ---------
------------------------------
Date: Mon, 12 May 2008 09:15:16 -0700
From: "Waylen Gumbal" <wgumgfy@gmail.com>
Subject: Re: None-textual content in tech groups
Message-Id: <68r8olF2ufgsmU1@mid.individual.net>
ambarish.mitra@gmail.com wrote:
> NOW, STOP ALL THIS NONSENSE. PLEASE.
My holy $deity, who the hell is forcing you to read this thread? If you
do not want to read it, then DON'T. What in the red Sam hell makes this
such a difficult concept for some people? What makes you think you have
the right to stop other people from conversing? This is like walking to
a group of people in public and telling them all to shutup. You'd likely
never do this in real life, so why attempt it here?
--
wg
------------------------------
Date: Mon, 12 May 2008 09:19:56 -0700
From: "Waylen Gumbal" <wgumgfy@gmail.com>
Subject: Re: None-textual content in tech groups
Message-Id: <68r91dF2smmj8U1@mid.individual.net>
ambarish.mitra@gmail.com wrote:
> STOP THIS. ENOUGH ALREADY.
Please stop trying to boss everyone around. If you don't like the topic,
DON'T READ IT. Would you walk up to a crowd in real life and shout "SHUT
UP" ? I hope the answer is no.
--
wg
------------------------------
Date: Mon, 12 May 2008 09:10:56 -0700
From: "szr" <szrRE@szromanMO.comVE>
Subject: Re: Perl DBI Module: SQL query where there is space in field name
Message-Id: <g09q6h02749@news4.newsguy.com>
Sir Robin wrote:
> On Sat, 10 May 2008 12:23:46 -0700, Andrew DeFaria
> <Andrew@DeFaria.com> wrote:
>
[...]
> And there is no reason whatsoever why a newsreader should need to be
> able to handle HTML
What reason is there not to, to be honest? It is one thing not to like
it, and it is completely another whether a reader should support it.
Since many other kinds of groups (which are usually non-technical) have
a following that don't look so negatively on the use of HTML posting, it
is perfectly reasonable for a reader to either support HTML or at least
be able to parse multipart posts and pull the desired section.
--
szr
------------------------------
Date: Mon, 12 May 2008 09:23:55 -0700
From: "Waylen Gumbal" <wgumgfy@gmail.com>
Subject: Re: Perl DBI Module: SQL query where there is space in field name
Message-Id: <68r98tF2v45klU1@mid.individual.net>
Charlton Wilbur wrote:
> It has been my observation for some time that people who insist on
> posting in a gibberish format are very likely to post gibberish
> content.
Here's the problem. You are attempting to pose a personal opinion as a
fact. Please do not mix the two. It may be a "gibberish format" to youm
but it doesn't mean it is to others. It is, in fact, a quite usuable
format to many out there, and anyone with a decent reader should be able
to configure which format they want to view by default.
--
wg
------------------------------
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 1536
***************************************