[29725] in Perl-Users-Digest
Perl-Users Digest, Issue: 969 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Oct 24 00:09:38 2007
Date: Tue, 23 Oct 2007 21:09:04 -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 Tue, 23 Oct 2007 Volume: 11 Number: 969
Today's topics:
ActiveState PerlNET TonyShirt@gmail.com
Re: cgi_bin <tadmc@seesig.invalid>
Re: cgi_bin <zaxfuuq@invalid.net>
Re: cgi_bin <zaxfuuq@invalid.net>
Re: cgi_bin <uri@stemsystems.com>
Re: cgi_bin <uri@stemsystems.com>
configurable variables in own file? ivowel@gmail.com
Re: control loop for contraction <zaxfuuq@invalid.net>
create a batch file <hara.acharya@gmail.com>
create a batch file <hara.acharya@gmail.com>
Re: create a batch file <peter@makholm.net>
Re: create a batch file <klaus03@gmail.com>
Re: create a batch file <wyzelli@yahoo.com>
Re: create a batch file <bik.mido@tiscalinet.it>
Re: create a batch file <1usa@llenroc.ude.invalid>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 23 Oct 2007 16:05:01 -0700
From: TonyShirt@gmail.com
Subject: ActiveState PerlNET
Message-Id: <1193180701.215706.35310@v23g2000prn.googlegroups.com>
I'm trying to build a .Net dll that I can call from VBA from some
perl. I've fiddled around with the PerlNet application and docs and I
just cant seem to get it to work. Here is the object I'm trying to
convert:
package SNPutils;
#Constructor
sub new
{
my($package) = @_;
return bless {}, $package;
}
sub rComp
{
my $self = shift;
my $seq = shift;
my $reversed = "";
$reversed = reverse $seq;
$reversed =~ tr/ACTGRYMKBVDHactgrymkbvdh/TGCAYRKMVBHDtgcayrkmvbhd/;
#TGCAYRKMVBHDtgcayrkmvbhd
return $reversed;
}
1;
when I run perlNET it seems to work. I get no errors. When I try and
register the dll. I get "DLL registerserver entry point could not be
found." when I try and access the DLL through the references I get
"Cant add a reference to the specified file"
Could some one help me out here? I'm obviously doing something wrong
or I don't understand something critical.
Thanks! Tony!
------------------------------
Date: Wed, 24 Oct 2007 00:17:21 GMT
From: Tad McClellan <tadmc@seesig.invalid>
Subject: Re: cgi_bin
Message-Id: <slrnfhrn2q.uk7.tadmc@tadmc30.sbcglobal.net>
Nick Wedd <nick@maproom.co.uk> wrote:
> In message <slrnfhqi60.mkf.tadmc@tadmc30.sbcglobal.net>, Tad McClellan
><tadmc@seesig.invalid> writes
>>Gunnar Hjalmarsson <noreply@gunnar.cc> wrote:
>>> Abigail wrote:
>>>> Gunnar Hjalmarsson (noreply@gunnar.cc) wrote on VCLXIV September MCMXCIII
>>>> in <URL:news:5o1tnrFkpgh4U1@mid.individual.net>:
>>>> &&
>>>> && I'd say that the lack of a more appropriate Usenet group _does_ justify
>>>> && him asking it here.
>>
>>
>>But he does not have a question about the Perl programming language,
>>which is the topic of this newsgroup.
> I didn't know that when I posted.
Which is perfectly understandable. Folks should calmly point it out,
along with an alternative place to ask, should they know of one.
What we're going on about now is not you asking the question, it is
about Gunnar's defense of allowing off-topic threads to continue.
> And I know almost nothing about configuring web servers.
But you will need to learn a bit if you are to find a solution
to your current problem...
[ snip 40 lines of quoting with no comment about them.
Please trim quotes to only what is required for context.
]
--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"
------------------------------
Date: Fri, 23 Nov 2007 20:01:40 -0800
From: "Wade Ward" <zaxfuuq@invalid.net>
Subject: Re: cgi_bin
Message-Id: <7didnS7iWZQcOoPanZ2dnUVZ_vumnZ2d@comcast.com>
"Abigail" <abigail@abigail.be> wrote in message
news:slrnfhr57c.ds1.abigail@alexandra.abigail.be...
> _
> Petr Vileta (stoupa@practisoft.cz) wrote on VCLXVI September MCMXCIII in
> <URL:news:ffjkvq$1f9p$2@ns.felk.cvut.cz>:
> ^^ Charlton Wilbur wrote:
> ^^ >>>>>> "GH" == Gunnar Hjalmarsson <noreply@gunnar.cc> writes:
> ^^ >
> ^^ > If that's the case, I'd love to ask some questions about roleplaying
> ^^ > games here (as rec.games.frp.moderated is nonfunctional) and knitting
> ^^ > (as I can't find a knitting-specific newsgroup). By your logic, both
> ^^ > of those should be perfectly fine, no?
> ^^ >
> ^^ If the game is written in Perl, then here is a good place I think :-)
>
>
> Wrong. With your logic, *NO* question should be asked in comp.lang.perl.*
> at all. Since perl is written in C, we ought to ask our questions in
> comp.lang.c.
Abigail,
clpm can never be as unhelpful, pedantic --they think that's a compliment--,
meanspirited and parochial as is clc; Perl is written in Perl. It uses C as
a abckend.
--
wade ward
Westates Companies
1108 W. South Jordan pkwy
435 -838-7760
President
wade@zaxfuuq.net
------------------------------
Date: Fri, 23 Nov 2007 20:06:32 -0800
From: "Wade Ward" <zaxfuuq@invalid.net>
Subject: Re: cgi_bin
Message-Id: <t6CdnXPePu84NYPanZ2dnUVZ_qiinZ2d@comcast.com>
"Nick Wedd" <nick@maproom.co.uk> wrote in message
news:yg8mz1IQ+bHHFAb1@maproom.demon.co.uk...
> In message <slrnfhqi60.mkf.tadmc@tadmc30.sbcglobal.net>, Tad McClellan
> <tadmc@seesig.invalid> writes
>>But he does not have a question about the Perl programming language,
>>which is the topic of this newsgroup.
>>
>>Defending off-topic posting is a futile postion to take...
>>
>>
>>> Unfortunately this discussion is not about linguistic semantics.
>>
>>
>>And neither is it about Perl.
>>
>>It is about web server configuration.
>>
>>If the OP chose to use Python instead, the answer to his
>>question would be *exactly the same*.
>>
>>The answer is independant of programming language, hence cannot
>>be on topic in a newsgroup about a particular programming language.
Independent. Are you one of CBFalconer's half-witted alter-egos, troll?
> I didn't know that when I posted. I thought that the Perl interpreter
> might, on some servers, treat a cgi_bin (or cgi-bin) directory in some
> special way.
>
> And I know almost nothing about configuring web servers. If I had asked
> on a newsgroup about web server configuration, I think I would have been
> less likely to get a helpful answer than I was here.
There just giving you a hard time. They must like you.
>>What I do mind is off-topic posts whose answer is unchanged
>>when you substitute "Python" or "PHP" for "Perl".
If it's OT it's pretty close to t.
Tad's a small man in Iowa, the only resident in my clpm killfile.
--
wade ward
Westates Companies
1108 W. South Jordan pkwy
435 -838-7760
President
wade@zaxfuuq.net
------------------------------
Date: Wed, 24 Oct 2007 04:04:49 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: cgi_bin
Message-Id: <x7lk9t40pr.fsf@mail.sysarch.com>
>>>>> "WW" == Wade Ward <zaxfuuq@invalid.net> writes:
WW> Perl is written in Perl. It uses C as
WW> a abckend.
you seem to be full of knowledge about perl that is very wrong. perl is
100% written in c and there is no perl code inside the perl binary
(actually there is a little perl text for wrapping -n and -p loop
bodies).
please stop making statements like this. you have made a bunch already
as you keep trying to map perl to your fortran mind.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Wed, 24 Oct 2007 04:06:13 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: cgi_bin
Message-Id: <x7hckh40ne.fsf@mail.sysarch.com>
>>>>> "WW" == Wade Ward <zaxfuuq@invalid.net> writes:
WW> Tad's a small man in Iowa, the only resident in my clpm killfile.
wrong state. and i am sure you are residing in many killfiles
already. if i used them, you would be there. you want to learn perl but
you keep acting like you know more about perl than you do. obviously
then you don't need our help.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Wed, 24 Oct 2007 03:29:32 -0000
From: ivowel@gmail.com
Subject: configurable variables in own file?
Message-Id: <1193196572.139921.70050@v23g2000prn.googlegroups.com>
Dear perl experts: I want to create a rather lightweight package that
just uses what is installed in standard perl. this problem must be
very common.
package mypackage:
require Exporter;
our @ISA= qw(Exporter);
our @EXPORT = qw( v1 v2 v3 v4 );
our ($v1, $v2, $v3, $v4) = ("user-please-set", "a", "b", "c");
($v1=~ /whatisit/);
## a lot more stuff, a lot more variables, etc.
so far so good. alas, I now realize that $v1 is something that I
would like my package users to change. instead of leaving it in
mypackage, I think it would be nice to have such variables layed out
into mypackageconfig.pm . mypackage should just load in
mypackageconfig.pm at compile time, and treat everything in it as its
own---like the C preprocessor #include.
optimally, I would like syntax like
package mypackage:
require Exporter;
our @ISA= qw(Exporter);
our @EXPORT = qw( v1 v2 v3 v4 );
include mypackageconfig;
our ($v2, $v3, $v4) = ("a", "b", "c");
($v1=~ /whatisit/);
## a lot more stuff, a lot more variables, etc.
and the file mypackageconfig would just contain
our $v1= "user-please-set";
is there a standard way to do this? I have been trying to accomplish
this, but always run into import/export problems.
sincerely,
/iaw
------------------------------
Date: Fri, 23 Nov 2007 11:57:56 -0800
From: "Wade Ward" <zaxfuuq@invalid.net>
Subject: Re: control loop for contraction
Message-Id: <zfSdnco4Xuu9q4PanZ2dnUVZ_vumnZ2d@comcast.com>
"Joe Smith" <joe@inwap.com> wrote in message
news:nIednfkmEtSUKYDanZ2dnUVZ_tWtnZ2d@comcast.com...
> Wade Ward wrote:
>> I'm trying to calculate an x s.t. 10 = (2**x )*1600.
>
> The code from the first posting is a bit bizarre, and does not appear
> to have anything to do with that statement. And your subject line:
> did you mean to say "reduction" instead? "contraction" does not make
> sense here.
> The pseudo code from the second posting is less coherent.
Thanks, Joe. Obviously, I've got two to the x on the wrong side. A
contraction is exactly what we called this in diffEQ. With a suitable
choice of first value, it must converge. So you bookend it, until the value
is less than 2**m for m at some negative integer, maybe -8 or so. Then you
crank it down to -25 and fill up the entire width of the data type. It
looks like you get 64 bits.
> 10 = (2**x) * 1600
> 10/1600 = 2 ** x
> log(10/1600) = log(2) * x
> x = log(10/1600) / log(2)
>
> linux% perl -le 'print log(10/1600)/log(2)'
> -7.32192809488736
> linux% perl -le 'print +(2**-7.32192809488736)*1600'
> 10
That's a good start. Why does this:
my $number14 = 42;
$number14 = ++ $number14;
print STDOUT "end is $number14\n";
seem not to execute? There's something about the way perl executes that
differs from C.
use strict;
use warnings;
# a cup is a twelfth of a quart
my $number1 = 42;
my $no2 = 2.71;
print STDOUT "no 1 is $number1\n";
print STDOUT "no 2 is $no2\n";
#US cup = 236.588238 cc
#1 centimeters = 0.393700787 inches
my $cups_to_cc = 236.588238;
my $cent_to_inch = 0.393700787;
# line 16 Semicolon seems to be missing at sugar3.pl line 16.
print STDOUT "no 3 is $cups_to_cc\n";
print STDOUT "no 4 is $cent_to_inch\n";
my $no5 = 3;
my $no6 = 4**$no5;
print STDOUT "no 5 is $no5\n";
print STDOUT "no 6 is $no6\n";
my $no7 = $cups_to_cc * ($cent_to_inch**$no5);
print STDOUT "no 7 is $no7\n";
my $no8 = 2**$no7;
my $no9 = 10*$no8;
print STDOUT "no 7 is $no7\n";
print STDOUT "no 8 is $no8\n";
print STDOUT "no 9 is $no9\n";
my $no10 = 7.35;
my $no11 = .03;
print STDOUT "no 10 is $no10\n";
print STDOUT "no 11 is $no11\n";
my $lower = $no10 - $no11;
my $upper= $no10 + $no11;
print STDOUT "lower is $lower\n";
print STDOUT "upper is $upper\n";
my $notdone = 0;
print STDOUT "notdone is $notdone\n";
my $temp= 42.1;
print STDOUT "temp is $temp\n";
my $exp = 1;
print STDOUT "exp is $exp\n";
my $epsilon = 2**(-1*$exp);
print STDOUT "epsilon is $epsilon\n";
# $m
while ($notdone)
{
my $number13 = 42;
$number13 = -- $number13;
print STDOUT "begin is $number13\n";
print STDOUT "epsilon is $epsilon\n";
$upper = $upper;
;
++ $notdone;
print STDOUT "notdone is $notdone\n";
my $number14 = 42;
$number14 = ++ $number14;
print STDOUT "end is $number14\n";
}
# perl contract2.pl 2>text55.txt >text56.txt
#end script begin output
no 1 is 42
no 2 is 2.71
no 3 is 236.588238
no 4 is 0.393700787
no 5 is 3
no 6 is 64
no 7 is 14.4375000473569
no 7 is 14.4375000473569
no 8 is 22188.1236093454
no 9 is 221881.236093454
no 10 is 7.35
no 11 is 0.03
lower is 7.32
upper is 7.38
notdone is 0
temp is 42.1
exp is 1
epsilon is 0.5
--
wade ward
Westates Companies
1108 W. South Jordan pkwy
435 -838-7760
President
wade@zaxfuuq.net
------------------------------
Date: Tue, 23 Oct 2007 12:55:44 -0000
From: king <hara.acharya@gmail.com>
Subject: create a batch file
Message-Id: <1193144144.007897.188390@e34g2000pro.googlegroups.com>
#!\c\perl\bin
use strict;
my $register="e0010088";
open(fh,">check.bat")
print fh "\@echo\n";
print fh "\@echo Comparing X16 reg\n";
print fh "check $register > test.log\n";
print fh "fc /l log test.log > comp.log\n";
print fh "find \"no differences encountered\" comp.log\n";
print fh "if errorlevel 1 goto fail1\n";
print fh "echo fine\n";
print fh "del test.log\n";
close (fh);
while running this file to create a batch file I am getting a error
saying error at print.
I want to create a batch file named check.bat which should contain the
below things: and the $ register value need to be replaced.
===============
@echo
@echo Comparing X16 reg
check $register > test.log
fc /l log test.log > comp.log
find \"no differences encountered\" comp.log
if errorlevel 1 goto fail1
echo fine
del test.log
=================
------------------------------
Date: Tue, 23 Oct 2007 12:56:21 -0000
From: king <hara.acharya@gmail.com>
Subject: create a batch file
Message-Id: <1193144181.145169.193500@t8g2000prg.googlegroups.com>
#!\c\perl\bin
use strict;
my $register="f0088";
open(fh,">check.bat")
print fh "\@echo\n";
print fh "\@echo Comparing X16 reg\n";
print fh "check $register > test.log\n";
print fh "fc /l log test.log > comp.log\n";
print fh "find \"no differences encountered\" comp.log\n";
print fh "if errorlevel 1 goto fail1\n";
print fh "echo fine\n";
print fh "del test.log\n";
close (fh);
while running this file to create a batch file I am getting a error
saying error at print.
I want to create a batch file named check.bat which should contain the
below things: and the $ register value need to be replaced.
===============
@echo
@echo Comparing X16 reg
check $register > test.log
fc /l log test.log > comp.log
find \"no differences encountered\" comp.log
if errorlevel 1 goto fail1
echo fine
del test.log
=================
------------------------------
Date: Tue, 23 Oct 2007 13:02:44 +0000
From: Peter Makholm <peter@makholm.net>
Subject: Re: create a batch file
Message-Id: <87abqam1aj.fsf@hacking.dk>
king <hara.acharya@gmail.com> writes:
> #!\c\perl\bin
> use strict;
> my $register="f0088";
> open(fh,">check.bat")
> print fh "\@echo\n";
> print fh "\@echo Comparing X16 reg\n";
> print fh "check $register > test.log\n";
> print fh "fc /l log test.log > comp.log\n";
> print fh "find \"no differences encountered\" comp.log\n";
> print fh "if errorlevel 1 goto fail1\n";
> print fh "echo fine\n";
> print fh "del test.log\n";
>
> close (fh);
This have a syntax error. It can't be what you have been running to
produce the followin.
> ===============
> @echo
> @echo Comparing X16 reg
> check $register > test.log
> fc /l log test.log > comp.log
> find \"no differences encountered\" comp.log
> if errorlevel 1 goto fail1
> echo fine
> del test.log
> =================
This is not what is being produced by a script not quite unlike the
above script. I get neither escaped double quotes nor uninterpolated
$register.
//Makholm
------------------------------
Date: Tue, 23 Oct 2007 06:15:16 -0700
From: Klaus <klaus03@gmail.com>
Subject: Re: create a batch file
Message-Id: <1193145316.202070.279290@e34g2000pro.googlegroups.com>
On Oct 23, 2:56 pm, king <hara.acha...@gmail.com> wrote:
> #!\c\perl\bin
assuming you are running on windows, that would be better written as
(although I don't think it matters on windows)
#!c:\perl\bin\perl
> use strict;
it is recommended to add
use warnings;
> my $register="f0088";
> open(fh,">check.bat")
There is a semicolon missing at the end of the line, but more
importantly, it is recommended to
1. *always* check the return code after open
2. use lexical filehandles
3. use the 3-parameter form of open
open my $fh, '>', 'check.bat' or die "Error open check.bat: $!";
> print fh "\@echo\n";
print {$fh} "\@echo\n";
[ snip and re-arranged ]
> I want to create...
> find \"no differences encountered\" comp.log
> print fh "find \"no differences encountered\" comp.log\n";
print {$fh} qq{find \\"no differences encountered\\" comp.log\n};
> close (fh);
close $fh;
> while running this file to create a batch file I am getting a error
> saying error at print.
Is this error message *exact* and *complete* ?
--
Klaus
------------------------------
Date: Tue, 23 Oct 2007 13:53:35 GMT
From: "Peter Wyzl" <wyzelli@yahoo.com>
Subject: Re: create a batch file
Message-Id: <z1nTi.3469$CN4.1371@news-server.bigpond.net.au>
"Klaus" <klaus03@gmail.com> wrote in message
news:1193145316.202070.279290@e34g2000pro.googlegroups.com...
> On Oct 23, 2:56 pm, king <hara.acha...@gmail.com> wrote:
>> #!\c\perl\bin
>
> assuming you are running on windows, that would be better written as
> (although I don't think it matters on windows)
>
> #!c:\perl\bin\perl
>
>> use strict;
>
> it is recommended to add
> use warnings;
>
>> my $register="f0088";
>> open(fh,">check.bat")
>
> There is a semicolon missing at the end of the line, but more
> importantly, it is recommended to
> 1. *always* check the return code after open
> 2. use lexical filehandles
> 3. use the 3-parameter form of open
>
> open my $fh, '>', 'check.bat' or die "Error open check.bat: $!";
>
>> print fh "\@echo\n";
> print {$fh} "\@echo\n";
>
> [ snip and re-arranged ]
>
>> I want to create...
>> find \"no differences encountered\" comp.log
>
>> print fh "find \"no differences encountered\" comp.log\n";
> print {$fh} qq{find \\"no differences encountered\\" comp.log\n};
print $fh 'find "no differences encountered" comp.log', "\n";
P
------------------------------
Date: Tue, 23 Oct 2007 17:03:04 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: create a batch file
Message-Id: <hv2sh3l2u2l3n1pcid37iub1je3pn7c2f9@4ax.com>
On Tue, 23 Oct 2007 12:55:44 -0000, king <hara.acharya@gmail.com>
wrote:
>print fh "\@echo\n";
>print fh "\@echo Comparing X16 reg\n";
>print fh "check $register > test.log\n";
>print fh "fc /l log test.log > comp.log\n";
>print fh "find \"no differences encountered\" comp.log\n";
>print fh "if errorlevel 1 goto fail1\n";
>print fh "echo fine\n";
>print fh "del test.log\n";
In addition to the other gotchas mentioned by others, consider using a
an here doc:
print $fh <<"EOBATCH";
\@echo
\@echo Comparing X16 reg
check $register > test.log
fc /l log test.log > comp.log
find "no differences encountered" comp.log
if errorlevel 1 goto fail1
echo fine
del test.log
EOBATCH
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: Tue, 23 Oct 2007 18:21:37 GMT
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: create a batch file
Message-Id: <Xns99D292128D821asu1cornelledu@127.0.0.1>
Klaus <klaus03@gmail.com> wrote in news:1193145316.202070.279290
@e34g2000pro.googlegroups.com:
> On Oct 23, 2:56 pm, king <hara.acha...@gmail.com> wrote:
>> #!\c\perl\bin
>
> assuming you are running on windows, that would be better written as
> (although I don't think it matters on windows)
>
> #!c:\perl\bin\perl
Well, that certainly better than the non-sensical path (to Windows) the
OP was using.
The only case where it might matter what path to perl you put in the
shebang line on Windows is when you are using Apache to run CGI scripts
and you have not heard of
http://httpd.apache.org/docs/2.2/mod/core.html#scriptinterpretersource
I have found it convenient to leave the shebang lines of my scripts as
#!/usr/bin/perl
which is usually a symlink to the system default perl on the *nix
systems I have access to.
Sinan
--
A. Sinan Unur <1usa@llenroc.ude.invalid>
(remove .invalid and reverse each component for email address)
clpmisc guidelines: <URL:http://www.augustmail.com/~tadmc/clpmisc.shtml>
------------------------------
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 969
**************************************