[26162] in Perl-Users-Digest
Perl-Users Digest, Issue: 8352 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Aug 24 09:05:38 2005
Date: Wed, 24 Aug 2005 06:05: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 Wed, 24 Aug 2005 Volume: 10 Number: 8352
Today's topics:
Creating a WIN32 folder share <rather@not.com>
Re: Creating a WIN32 folder share <ThomasKratz@REMOVEwebCAPS.de>
Re: Creating a WIN32 folder share <prawnMUNG@prawn.me.uk>
Re: Creating a WIN32 folder share <rather@not.com>
Re: Creating a WIN32 folder share <rather@not.com>
Re: Creating a WIN32 folder share <prawnMUNG@prawn.me.uk>
Makefile - perl script syntax error <leongyc@tp.edu.sg>
Re: Makefile - perl script syntax error <josef.moellers@fujitsu-siemens.com>
Re: Oraperl - terminates script on error. How to handle <Peter@PSDT.com>
packages <bobsmith1@marketweighton.com>
Re: packages (Anno Siegel)
Re: packages <bobsmith1@marketweighton.com>
Re: Passing a Module as an Object or Reference (Anno Siegel)
Re: Perl <-> C language interaction <ThomasKratz@REMOVEwebCAPS.de>
Re: regex help (Anno Siegel)
Re: Text display like table <georgekinley@hotmail.com>
TimeDate conversion to string. <ranger_lp@hotmail.com>
Re: TimeDate conversion to string. <for-spammers-only@web.de>
Re: Use of uninitialized value Error <tadmc@augustmail.com>
Re: Use of uninitialized value Error <nospam@nospam.com>
Re: Use of uninitialized value Error <nospam@nospam.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 24 Aug 2005 03:47:29 -0500
From: Stephen <rather@not.com>
Subject: Creating a WIN32 folder share
Message-Id: <Xns96BC6DC69B6BStephenBaileyderivco@168.209.98.66>
Hi,
Is there a simple way to share a WIN32 folder.
I have tried using Win32::FileSecurity but the results of a EnumerateRights
on a folder before and after I manually share the folder are exactly the
same.
Thanks
-Steve
------------------------------
Date: Wed, 24 Aug 2005 11:59:55 +0200
From: Thomas Kratz <ThomasKratz@REMOVEwebCAPS.de>
Subject: Re: Creating a WIN32 folder share
Message-Id: <430c451b$0$11220$bb690d87@news.main-rheiner.de>
Stephen wrote:
> Hi,
>
> Is there a simple way to share a WIN32 folder.
>
> I have tried using Win32::FileSecurity but the results of a EnumerateRights
> on a folder before and after I manually share the folder are exactly the
> same.
I think you have to straighten your nomenclature. Sharing of
folders/directories has nothing to do with filesystem rights. You can have
ACLs on the share itself as you can have on other objects, but you
should not mix them up conceptwise.
For sharing a folder try Win32::NetResource or Win32::Lanman
For setting ACLs use Win32::FileSecurity or Win32::Perms
Thomas
--
$/=$,,$_=<DATA>,s,(.*),$1,see;__END__
s,^(.*\043),,mg,@_=map{[split'']}split;{#>J~.>_an~>>e~......>r~
$_=$_[$%][$"];y,<~>^,-++-,?{$/=--$|?'"':#..u.t.^.o.P.r.>ha~.e..
'%',s,(.),\$$/$1=1,,$;=$_}:/\w/?{y,_, ,,#..>s^~ht<._..._..c....
print}:y,.,,||last,,,,,,$_=$;;eval,redo}#.....>.e.r^.>l^..>k^.-
------------------------------
Date: Wed, 24 Aug 2005 11:03:24 +0100
From: prawn <prawnMUNG@prawn.me.uk>
Subject: Re: Creating a WIN32 folder share
Message-Id: <430c45dc$0$1289$ed2619ec@ptn-nntp-reader02.plus.net>
Stephen wrote:
>Hi,
>
>Is there a simple way to share a WIN32 folder.
>
>I have tried using Win32::FileSecurity but the results of a EnumerateRights
>on a folder before and after I manually share the folder are exactly the
>same.
>
>
>
>
Dunno about a Perl solution, though you could try shelling out to the
net command. For a full command line spec, type 'net share /?' from the
command line.
It's not very elegant, but should get the job done.
HTH..
--
p LotR#9
------------------------------
Date: Wed, 24 Aug 2005 05:53:20 -0500
From: Stephen <rather@not.com>
Subject: Re: Creating a WIN32 folder share
Message-Id: <Xns96BC831C033F9StephenBaileyderivco@168.209.98.66>
Thomas Kratz <ThomasKratz@REMOVEwebCAPS.de> wrote in
news:430c451b$0$11220$bb690d87@news.main-rheiner.de:
> Stephen wrote:
>> Hi,
>>
>> Is there a simple way to share a WIN32 folder.
>>
>> I have tried using Win32::FileSecurity but the results of a
>> EnumerateRights on a folder before and after I manually share the
>> folder are exactly the same.
>
> I think you have to straighten your nomenclature. Sharing of
> folders/directories has nothing to do with filesystem rights. You can
> have
> ACLs on the share itself as you can have on other objects, but you
> should not mix them up conceptwise.
>
> For sharing a folder try Win32::NetResource or Win32::Lanman
> For setting ACLs use Win32::FileSecurity or Win32::Perms
>
> Thomas
>
Thanks... as you spotted I know nothing aobout nomenclature leaset of all
how to pronouce it :-)
-Steve
------------------------------
Date: Wed, 24 Aug 2005 05:54:42 -0500
From: Stephen <rather@not.com>
Subject: Re: Creating a WIN32 folder share
Message-Id: <Xns96BC8357DE31CStephenBaileyderivco@168.209.98.66>
prawn <prawnMUNG@prawn.me.uk> wrote in
news:430c45dc$0$1289$ed2619ec@ptn-nntp-reader02.plus.net:
> Stephen wrote:
>
>>Hi,
>>
>>Is there a simple way to share a WIN32 folder.
>>
>>I have tried using Win32::FileSecurity but the results of a
>>EnumerateRights on a folder before and after I manually share the
>>folder are exactly the same.
>>
>>
>>
>>
>
> Dunno about a Perl solution, though you could try shelling out to the
> net command. For a full command line spec, type 'net share /?' from
> the command line.
>
> It's not very elegant, but should get the job done.
>
> HTH..
>
Thanks, that will come in very hady too. I tried looking for something like
this the other day and came up short !
-Steve
------------------------------
Date: Wed, 24 Aug 2005 13:13:31 +0100
From: prawn <prawnMUNG@prawn.me.uk>
Subject: Re: Creating a WIN32 folder share
Message-Id: <430c645b$0$1286$ed2619ec@ptn-nntp-reader02.plus.net>
Stephen wrote:
>Thanks, that will come in very hady too. I tried looking for something like
>this the other day and came up short !
>
>
>
Heh. It would have been handy if I'd given the right command. I meant,
'net share', of course. Anyway, it appears thare's a more elegant
solution to your problem.
--
p LotR#9
------------------------------
Date: Wed, 24 Aug 2005 17:58:49 +0800
From: "NewBie" <leongyc@tp.edu.sg>
Subject: Makefile - perl script syntax error
Message-Id: <430c41f1$1@news>
Hi,
Appreciate any pointer why there is a compliant:
The perl script (partial):
:
orca_logo.gif.hex: orca_logo.gif
perl -e 'while (sysread(STDIN, $$b, 35)){print unpack("h*",
$$b),"\n"}' < $< > $@
:
The complaint:
:
make CFLAGS=-g -O2 || exit 1
perl -e 'while (sysread(STDIN, $b, 35)){print unpack("h*",
$b),"\n"}' < > orca_logo.gif.hex
sh: Syntax error at line 1 : `>' is not expected.
:
Thanks in advance.
------------------------------
Date: Wed, 24 Aug 2005 12:54:47 +0200
From: Josef Moellers <josef.moellers@fujitsu-siemens.com>
Subject: Re: Makefile - perl script syntax error
Message-Id: <dehjfa$noc$1@nntp.fujitsu-siemens.com>
NewBie wrote:
> Hi,
>=20
> Appreciate any pointer why there is a compliant:
>=20
> The perl script (partial):
This is not a part of a perl script, it is part of your makefile:
> :
> orca_logo.gif.hex: orca_logo.gif
> perl -e 'while (sysread(STDIN, $$b, 35)){print unpack("h*",=20
> $$b),"\n"}' < $< > $@
> :
>=20
> The complaint:
> :
> make CFLAGS=3D-g -O2 || exit 1
> perl -e 'while (sysread(STDIN, $b, 35)){print unpack("h*",=20
> $b),"\n"}' < > orca_logo.gif.hex
> sh: Syntax error at line 1 : `>' is not expected.
> :
And your Perl question is?
You seem to have problems with your makefile, not with your perl=20
one-liner. (Strange thing is that it works for me.) Apparently your make =
doesn't recognize the "$<", but again, you don't have a Perl problem (yet=
).
--=20
Josef M=F6llers (Pinguinpfleger bei FSC)
If failure had no penalty success would not be a prize
-- T. Pratchett
------------------------------
Date: Wed, 24 Aug 2005 12:42:49 GMT
From: Peter Scott <Peter@PSDT.com>
Subject: Re: Oraperl - terminates script on error. How to handle??
Message-Id: <pan.2005.08.24.12.42.34.386564@PSDT.com>
On Wed, 24 Aug 2005 02:03:55 +0000, xhoster wrote:
> "Edward" <egoduk@NOSPAM_hotmail.com> wrote:
>> DBD::Oracle::st execute failed: ORA-01722: invalid number (DBD ERROR:
>> OCIStmtExecute) [for statement ``insert into
>> mask_day_bucket(sku,cfc,day,profile_id)values('1A046011','1','monday',
>> '1') ''
>> with params: ]) at
>> /usr/local/perl-5.8.0/lib/site_perl/5.8.0/sun4-solaris-thread-multi/Orape
>> r l.pm
>> line 132, <IN> line 3.
>
> I don't know what "oraperl" is, but it seems to use DBI. I'd try either
> turning off DBI's RaiseError, or putting your function call in an eval
> block and check $@ for errors.
http://search.cpan.org/~timb/DBD-Oracle-1.16/Oraperl.pm
I would suggest to the OP that it is time to enter the 21st century and
rewrite to use DBD::Oracle. The oraperl interface was written for Perl *4*.
--
Peter Scott
http://www.perlmedic.com/
http://www.perldebugged.com/
------------------------------
Date: Wed, 24 Aug 2005 13:56:14 +0200
From: Greger <bobsmith1@marketweighton.com>
Subject: packages
Message-Id: <deheod$sim$1@phys-news1.kolumbus.fi>
say I want to creat P1 and P2, but want them to live in file X.pm
is it possible to store two packages in one file?
G
--
http://www.gregerhaga.net
http://skpp.sourceforge.net
------------------------------
Date: 24 Aug 2005 09:52:30 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: packages
Message-Id: <dehg0u$qr0$1@mamenchi.zrz.TU-Berlin.DE>
Greger <bobsmith1@marketweighton.com> wrote in comp.lang.perl.misc:
> say I want to creat P1 and P2, but want them to live in file X.pm
> is it possible to store two packages in one file?
What happened when you tried it?
You can put as many packages in a file as you want. Automatic importation
is only done for the package whose name corresponds to the file name, if
any.
Anno
--
If you want to post a followup via groups.google.com, don't use
the broken "Reply" link at the bottom of the article. Click on
"show options" at the top of the article, then click on the
"Reply" at the bottom of the article headers.
------------------------------
Date: Wed, 24 Aug 2005 17:24:19 +0200
From: Greger <bobsmith1@marketweighton.com>
Subject: Re: packages
Message-Id: <dehqui$oag$1@phys-news1.kolumbus.fi>
Greger wrote:
> say I want to creat P1 and P2, but want them to live in file X.pm
> is it possible to store two packages in one file?
> G
well, magic happened,
--
http://www.gregerhaga.net
http://skpp.sourceforge.net
------------------------------
Date: 24 Aug 2005 09:14:35 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Passing a Module as an Object or Reference
Message-Id: <dehdpr$nf7$1@mamenchi.zrz.TU-Berlin.DE>
Hal Vaughan <hal@thresholddigital.com> wrote in comp.lang.perl.misc:
> I have a module, TD::Log.pm (TD is the company name, so most modules are in
> that directory). When I write a program, I use:
>
> use TD::Log;
>
> as expected. I also have other modules I use. I know a module can
> reference the function "entry()" in the instance TD::Log in the main
> program by using:
>
> main::TD::Log::entry("status: adding today's data to file");
The standard way of accessing entry() in package TD::log is
TD::log::entry( ...);
I wasn't even aware you can access it as
main::TD::log::entry( ...);
and, for that matter, also as
main::main::main::TD::log::entry( ...);
apparently with as many "main::"s as you want. This is a quirk in Perl
but not something to be used in practical programs.
> However, what I'd like to do, when I open a new module from main, say
> "TD::IncomingData.pm" is to use main::TD::Log::entry more simply. Is there
> some way, from the main program, I can pass a reference to the instance of
> TD:Log the main program uses to TD::IncomingData so I can reference the
> routines directly in TD::IncomingData? Something like:
>
> use TD::Log;
> use TD::IncomingData;
>
> incomingdatainit({some reference to TD::Log});
See perldoc Exporter.
Anno
--
If you want to post a followup via groups.google.com, don't use
the broken "Reply" link at the bottom of the article. Click on
"show options" at the top of the article, then click on the
"Reply" at the bottom of the article headers.
------------------------------
Date: Wed, 24 Aug 2005 13:13:50 +0200
From: Thomas Kratz <ThomasKratz@REMOVEwebCAPS.de>
Subject: Re: Perl <-> C language interaction
Message-Id: <430c566d$0$11220$bb690d87@news.main-rheiner.de>
Amontec, Larry wrote:
> Hi all,
>
> I have to parse ASCII text file and then to use the the parsed data to a
> C program. Than the C program will act on an dedicated external USB
> device via its dedicated driver.
>
> Perl is just great to do the parse of the text file, since the text file
> is not so structured.
>
> My question: how can I interact between a perl script to a C program. I
> mean I will have pointer of structure to pass to the C program.
In addition to the pointers already given, have a look at the Inline
module and Inline::C.
Thomas
--
$/=$,,$_=<DATA>,s,(.*),$1,see;__END__
s,^(.*\043),,mg,@_=map{[split'']}split;{#>J~.>_an~>>e~......>r~
$_=$_[$%][$"];y,<~>^,-++-,?{$/=--$|?'"':#..u.t.^.o.P.r.>ha~.e..
'%',s,(.),\$$/$1=1,,$;=$_}:/\w/?{y,_, ,,#..>s^~ht<._..._..c....
print}:y,.,,||last,,,,,,$_=$;;eval,redo}#.....>.e.r^.>l^..>k^.-
------------------------------
Date: 24 Aug 2005 11:47:42 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: regex help
Message-Id: <dehmou$12u$1@mamenchi.zrz.TU-Berlin.DE>
Andreas Bauer <buki@gmx.net> wrote in comp.lang.perl.misc:
> Hi ,
>
> I'm a bit stuck with a regular expression. Maybe somebody's so kind
> to help me a bit :)
> I have the following example strings.
>
> test_word.pdf#en:Test Word>top
> /file\file.asp>top
> /file/file.asp
> file\start.asp?load=http://www.test.de>top
> file/start.asp?load=http://www.test.de
> file/start.asp?load=http://www.test.de#de:Beispiel;en:example;
> file/start.asp?load=http://www.test.de#de:Beispiel;en:example;>top
> file/start.asp>top
> file/start.asp
> file/start.asp#de:Beispiel;en:example;
> file/start.asp#de:Beispiel;en:example;>top
> /file/start.asp#de:Beispiel;en:example;>top
> http://www.start.de
> http://www.start.de?load=http://www.test.de#de:Beispiel;en:example;>top
> ftp://ftp.test.tt#en:example page
> ...
>
> I need a regex that extracts me
> - the part (file, file/, ftp://ftp.test.tt,start.asp,etc) before
> ?load=... whereas ?load ist optional
If "?load" is optional, where does the first match end when "?load"
is not there?
> - the the uri after ?load=. That normally ends at # or > or
Where does the URI start if "?load" is not there?
> - the part after > at the end (optional)
Again you delimit a match by an optional part of the pattern.
> - finally the part 'example' between #de:Beispiel;en:.. and the end of
> the line or '>top'
>
> For the examples starting with 'file' the following regex works fine:
> ((.*)[(/|\\)])(.*\.asp)(\?load=(.*)#)?((.*;en:(.*));)?(>(.*)$)?
>
> But I don't succeed in expanding the regex to match the first example
> string (test_word.pdf#en:Test Word>top)and the last three with http://,
> ftp://.
>
> I'm quite stuck with that.
You need a logically sound specification before you can design the
regex. Delimiting patterns with optional parts won't do. It's no
wonder you got stuck with the implementation.
If a part is optional, the adjacent matches *must* be self-contained,
they can't rely on the optional part to describe where they end or begin.
Solve that and you will have a chance to find your regex.
Anno
--
If you want to post a followup via groups.google.com, don't use
the broken "Reply" link at the bottom of the article. Click on
"show options" at the top of the article, then click on the
"Reply" at the bottom of the article headers.
------------------------------
Date: Wed, 24 Aug 2005 09:05:08 GMT
From: "George" <georgekinley@hotmail.com>
Subject: Re: Text display like table
Message-Id: <xn0e6djgb2z0nf8002@news.europe.nokia.com>
ngoc wrote:
> Hi
> I want to make
>
> column1 column2 column3
> ------ ------- -------
> value1 value2 value3
> value1 value2 value3
>
> I evaluate Text::Table, Text::ASCIITable, Text::TabularDisplay
> 1. Text::Table does not have set_width() function between columns and
> it uses {title => ' ' x 5, is_sep => 1}. I do not like this way. 2.
> Text::TabularDisplay is simple to use, but always has separators for
> each values. 3. Text::ASCIITable: the way setting head/column
> separator is complicated.
>
> Any suggestions for other packages than those that in simple way can
> I create format above.
>
> Thanks
> ngoc
perldoc -f format
------------------------------
Date: Wed, 24 Aug 2005 02:13:10 -0400
From: "Tony" <ranger_lp@hotmail.com>
Subject: TimeDate conversion to string.
Message-Id: <XdUOe.7758$KX7.6778@fe10.lga>
I'm trying to use the output of the the date/time from localtime into a
label.:
($sec,$min,$hour,$mday,$mon,$year,$wday,
$yday,$isdst)=localtime(time);
$year = ($year + 1900) - 2000;
$labelname = printf "REL_" . $proj[0] . "_%02d%02d%02d_%02d%02d%02d",
$hour,$min,$sec,$mon+1,$mday,$year;
print "$labelname\\n";
The problem is that when I input $labelname into a system command, an error
is returned saying
REL_Tony_021138_0824051
cleartool: Error: Name cannot be an integer: "1".
cleartool: Error: Unable to create label type "1".
Why do I get the extra 1 when adding \n?
How can I make this a string so it will be read as a string?
Tony
------------------------------
Date: Wed, 24 Aug 2005 10:07:13 +0200
From: Toni Erdmann <for-spammers-only@web.de>
Subject: Re: TimeDate conversion to string.
Message-Id: <deh9rh$ctu$1@news.mch.sbs.de>
Tony wrote:
> I'm trying to use the output of the the date/time from localtime into a
> label.:
>
> ($sec,$min,$hour,$mday,$mon,$year,$wday,
> $yday,$isdst)=localtime(time);
> $year = ($year + 1900) - 2000;
> $labelname = printf "REL_" . $proj[0] . "_%02d%02d%02d_%02d%02d%02d",
^^^^^^
Do you mean "sprintf".
> $hour,$min,$sec,$mon+1,$mday,$year;
> print "$labelname\\n";
>
> The problem is that when I input $labelname into a system command, an error
> is returned saying
>
> REL_Tony_021138_0824051
> cleartool: Error: Name cannot be an integer: "1".
> cleartool: Error: Unable to create label type "1".
>
> Why do I get the extra 1 when adding \n?
> How can I make this a string so it will be read as a string?
>
> Tony
>
>
Toni
------------------------------
Date: Tue, 23 Aug 2005 22:55:16 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: Use of uninitialized value Error
Message-Id: <slrndgnrt4.r9m.tadmc@magna.augustmail.com>
daniel kaplan <nospam@nospam.com> wrote:
> "Tad McClellan" <tadmc@augustmail.com> wrote in message
> news:slrndgkeni.m06.tadmc@magna.augustmail.com...
>
>> Your answer is not in keeping with "one of the rudest people i have
>> ever encountered on a newsgroup".
>>
>> You're going to blow your reputation! :-)
>
>
> ah but don't worry, i fought back a little ...
Do you come here to fight or do you come here to learn more Perl?
(I've formed my opinion on that some time ago.)
> in reply to:
>
>>> my $came_from = 'I must learn proper CGI programming first';
>
> i responded with:
>
> But even after changing: my $came_from = xxxxxxxxx
> to: my $came_from = 'You need to learn to be nicer to others';
>
> so if you want, we can do this dance....but am so tired, we don't have to,
> do we? ;-)
No we don't _have_ to, but you are going to take us there anyway.
If you had learned proper CGI programming, it would have ended there,
and you would have avoided a bazillion more problems that are bound
to occur when you do not have a proper mental model of how the
application area you are writing for works.
But that is not going to happen now, is it. We have been here before...
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 24 Aug 2005 07:25:02 -0400
From: "daniel kaplan" <nospam@nospam.com>
Subject: Re: Use of uninitialized value Error
Message-Id: <1124882647.453212@nntp.acecape.com>
"Tad McClellan" <tadmc@augustmail.com> wrote in message
news:slrndgnrt4.r9m.tadmc@magna.augustmail.com...
>
> Do you come here to fight or do you come here to learn more Perl?
>
ahhh geez, give me a break. when pushed, i push back that simple....can't
belive some of you some times....later
------------------------------
Date: Wed, 24 Aug 2005 07:33:11 -0400
From: "daniel kaplan" <nospam@nospam.com>
Subject: Re: Use of uninitialized value Error
Message-Id: <1124883135.32646@nntp.acecape.com>
"Tad McClellan" <tadmc@augustmail.com> wrote in message
news:slrndgnrt4.r9m.tadmc@magna.augustmail.com...
> Do you come here to fight or do you come here to learn more Perl?
>
> (I've formed my opinion on that some time ago.)
i mean, do you realize that this was a done thread? all nice and like, and
then only kept alive by you with:
>Your answer is not in keeping with "one of the rudest people i have
>ever encountered on a newsgroup".
>You're going to blow your reputation! :-)
So with all due respect, I'll just drop this thread now. My thanks to
Brian, Paul, and anyone else who just took the time to respond to my OP.
Daniel
------------------------------
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 8352
***************************************
