[24809] in Perl-Users-Digest
Perl-Users Digest, Issue: 6962 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Sep 5 09:06:24 2004
Date: Sun, 5 Sep 2004 06:05:09 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sun, 5 Sep 2004 Volume: 10 Number: 6962
Today's topics:
Re: Burned using the .. operator <notvalid@email.com>
Re: can I use 3 dot operator? <richard.kofler@chello.at>
cannot use CPAN, what is wrong? <scarleton-nospam@miltonstreet.com>
Re: cannot use CPAN, what is wrong? <scarleton-nospam@miltonstreet.com>
dealing with bad urllist in CPAN <scarleton-nospam@miltonstreet.com>
Re: dealing with bad urllist in CPAN <scarleton-nospam@miltonstreet.com>
Easiest way to do FTP without the module? (John Doe)
Re: Easiest way to do FTP without the module? <nospam@bigpond.com>
Re: Mingw and perl. <kalinaubears@iinet.net.au>
Re: multiple regex pattern matching per line? <tadmc@augustmail.com>
Re: packing floats? <mikee@mikee.ath.cx>
Re: packing floats? <uri@stemsystems.com>
Re: packing floats? <mikee@mikee.ath.cx>
Re: print Location to blank window? <nospam@bigpond.com>
Sending vars from Perl to PHP <joericochuyt@msn.com>
Re: Update multiple lines in a flat file from array <bill@hotmail.com>
Re: Update multiple lines in a flat file from array <mritty@gmail.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sun, 05 Sep 2004 02:41:32 GMT
From: Ala Qumsieh <notvalid@email.com>
Subject: Re: Burned using the .. operator
Message-Id: <w1v_c.15996$JU4.8809@newssvr27.news.prodigy.com>
J. Romano wrote:
[snip description of short-circuiting]
> Which brings me to another point to be careful of:
>
> Anytime you type a line like this (that contains the .. or the ...
> operator) in the debugger:
>
> print "True" if m/BEGIN/ .. m/END/;
>
> it is essentially the same as the line:
>
> print "True" if m/BEGIN/;
>
> because that line, when typed in the debugger, only gets evaluated
> once, and therefore only the first part of the .. operator will make a
> difference when evaluated. This is true even if you type that
> condition into the debugger multiple times (because, according to the
> interpreter, those are separate instantiations of the .. operator, and
> therefore they all keep their own separate state).
I don't understand what you mean here. The following two lines are
different:
print "True" if /BEGIN/ .. /END/;
print "True" if /BEGIN/;
The perlop docs explain the range operator:
In scalar context, ".." returns a boolean value. The operator is
bistable, like a flip-flop, and emulates the line-range (comma)
operator of sed, awk, and various editors. Each ".." operator
maintains its own boolean state. It is false as long as its left
operand is false. Once the left operand is true, the range operator
stays true until the right operand is true, *AFTER* which the range
operator becomes false again.
> So be careful of using the .. and ... operators in a condition
> where short-circuit evaluation is an issue. Hopefully fewer
> programmers will be burned by this now that I have shared this with
> you.
Short-circuiting is very useful and ubiquitous in Perl. Have you never
used the following idiom:
open my $fh, $file or die $!;
? Short-circuiting is what prevents the die() from executing if the
open() succeeds.
--Ala
------------------------------
Date: Sun, 05 Sep 2004 00:14:44 GMT
From: Richard Kofler <richard.kofler@chello.at>
Subject: Re: can I use 3 dot operator?
Message-Id: <413A5AFA.6D525780@chello.at>
Brian McCauley wrote:
>
> Richard Kofler wrote:
>
> > Subject: can I use 3 dot operator?
>
> Probably not usefully in this case.
>
[ ... snipping useful code corrections ... ]
Thank you, Brian.
The script looks much better the way, you
showed me to do it!
dic_k
--
Richard Kofler
SOLID STATE EDV
Dienstleistungen GmbH
Vienna/Austria/Europe
------------------------------
Date: Sun, 05 Sep 2004 02:59:24 GMT
From: Sam Carleton <scarleton-nospam@miltonstreet.com>
Subject: cannot use CPAN, what is wrong?
Message-Id: <giv_c.16221$8.8349@fe1.columbus.rr.com>
I am simply trying to get a peice of software installed and I
cannot figure out why CPAN is not working, I have tried removing
and added urllist's, but I keep getting the same thing. Can
someone enlighten me as to how to fix this, please:
cpan> o conf urllist
urllist
http://ftp.lug.udel.edu/pub/CPAN/
http://cpan.uky.edu/
ftp://cpan.in-span.net/
Type 'o conf' to view configuration edit options
cpan> install MD5
CPAN: Storable loaded ok
Going to read /root/.cpan/Metadata
Database was generated on Mon, 05 Jul 2004 06:04:48 GMT
Running install for module MD5
Running make for G/GA/GAAS/MD5-2.03.tar.gz
LWP not available
LWP not available
LWP not available
CPAN: Net::FTP loaded ok
Fetching with Net::FTP:
ftp://cpan.in-span.net/authors/id/G/GA/GAAS/MD5-2.03.tar.gz
Couldn't fetch MD5-2.03.tar.gz from cpan.in-span.net
Trying with "/usr/local/bin/lynx -source" to get
http://ftp.lug.udel.edu/pub/CPAN/authors/id/G/GA/GAAS/MD5-2.03.tar.gz
gzip: /root/.cpan/sources/authors/id/G/GA/GAAS/MD5-2.03.tar:
unknown suffix: ignored
CPAN: Digest::MD5 loaded ok
Checksum mismatch for distribution file. Please investigate.
Distribution id = G/GA/GAAS/MD5-2.03.tar.gz
CPAN_USERID GAAS (Gisle Aas <gisle@ActiveState.com>)
CALLED_FOR MD5
CONTAINSMODS MD5
MD5_STATUS
incommandcolor 1
localfile
/root/.cpan/sources/authors/id/G/GA/GAAS/MD5-2.03.tar.gz
I'd recommend removing
/root/.cpan/sources/authors/id/G/GA/GAAS/MD5-2.03.tar.gz. Its MD5
checksum is incorrect. Maybe you have configured your 'urllist'
with
a bad URL. Please check this array with 'o conf urllist', and
retry.
cpan>
------------------------------
Date: Sun, 05 Sep 2004 12:02:06 GMT
From: Sam Carleton <scarleton-nospam@miltonstreet.com>
Subject: Re: cannot use CPAN, what is wrong?
Message-Id: <2fD_c.302899$fv.198830@fe2.columbus.rr.com>
The problem was a matter of FTP not working. Apparently my
firewall is not allowing normal FTP and I have to set FTP_PASSIVE
to get CPAN to go into passive mode.
On Sun, 05 Sep 2004 at 02:59 GMT, Sam Carleton wrote:
> I am simply trying to get a peice of software installed and I
> cannot figure out why CPAN is not working, I have tried removing
> and added urllist's, but I keep getting the same thing. Can
> someone enlighten me as to how to fix this, please:
>
> cpan> o conf urllist
> urllist
> http://ftp.lug.udel.edu/pub/CPAN/
> http://cpan.uky.edu/
> ftp://cpan.in-span.net/
> Type 'o conf' to view configuration edit options
>
>
> cpan> install MD5
> CPAN: Storable loaded ok
> Going to read /root/.cpan/Metadata
> Database was generated on Mon, 05 Jul 2004 06:04:48 GMT
> Running install for module MD5
> Running make for G/GA/GAAS/MD5-2.03.tar.gz
> LWP not available
> LWP not available
> LWP not available
> CPAN: Net::FTP loaded ok
> Fetching with Net::FTP:
> ftp://cpan.in-span.net/authors/id/G/GA/GAAS/MD5-2.03.tar.gz
> Couldn't fetch MD5-2.03.tar.gz from cpan.in-span.net
>
> Trying with "/usr/local/bin/lynx -source" to get
> http://ftp.lug.udel.edu/pub/CPAN/authors/id/G/GA/GAAS/MD5-2.03.tar.gz
> gzip: /root/.cpan/sources/authors/id/G/GA/GAAS/MD5-2.03.tar:
> unknown suffix: ignored
> CPAN: Digest::MD5 loaded ok
>
> Checksum mismatch for distribution file. Please investigate.
>
> Distribution id = G/GA/GAAS/MD5-2.03.tar.gz
> CPAN_USERID GAAS (Gisle Aas <gisle@ActiveState.com>)
> CALLED_FOR MD5
> CONTAINSMODS MD5
> MD5_STATUS
> incommandcolor 1
> localfile
> /root/.cpan/sources/authors/id/G/GA/GAAS/MD5-2.03.tar.gz
>
> I'd recommend removing
> /root/.cpan/sources/authors/id/G/GA/GAAS/MD5-2.03.tar.gz. Its MD5
> checksum is incorrect. Maybe you have configured your 'urllist'
> with
> a bad URL. Please check this array with 'o conf urllist', and
> retry.
>
> cpan>
------------------------------
Date: Sun, 05 Sep 2004 02:46:53 GMT
From: Sam Carleton <scarleton-nospam@miltonstreet.com>
Subject: dealing with bad urllist in CPAN
Message-Id: <x6v_c.16108$8.13561@fe1.columbus.rr.com>
folks,
I have read the perldoc CPAN and I cannot figure out how to alter
the urllist in CPAN. I have five entries and at least the 1st is
bad. I need to remove it and add some more, how do I do that and
where do I go to get the list of urllists?
sam
------------------------------
Date: Sun, 05 Sep 2004 12:02:34 GMT
From: Sam Carleton <scarleton-nospam@miltonstreet.com>
Subject: Re: dealing with bad urllist in CPAN
Message-Id: <ufD_c.302901$fv.220503@fe2.columbus.rr.com>
pop them off!
On Sun, 05 Sep 2004 at 02:46 GMT, Sam Carleton wrote:
> folks,
>
> I have read the perldoc CPAN and I cannot figure out how to alter
> the urllist in CPAN. I have five entries and at least the 1st is
> bad. I need to remove it and add some more, how do I do that and
> where do I go to get the list of urllists?
>
> sam
------------------------------
Date: 5 Sep 2004 01:53:26 -0700
From: workingstiff19@hotmail.com (John Doe)
Subject: Easiest way to do FTP without the module?
Message-Id: <440d3e16.0409050053.71eaad48@posting.google.com>
I am actually doing sftp (secure FTP) and have given up trying to
build the sftp perl module on AIX; it is a lost cause. Net-FTP would
be a breeze, but no unencrypted connection is allowed. :-(
I can open an sftp session manually, so that is working. I am
wondering what would be the easiest way to run it from perl.
(Expect.pm? <--have never used. R. Schwartz has said that Expect.pm
is often doing it the hard way.) Does anyone know another CPAN module
that could apply?
I want to be able to list files in the sftp session, store that list
o' files in an array for processing, fetch and remove some of the
files, etc.
Any suggestions?
Off topic, but related: Does anyone know where to find more info on
using the "-b batchfile" option of sftp mentioned on the sftp man
page?
------------------------------
Date: Sun, 05 Sep 2004 19:30:06 +1000
From: Gregory Toomey <nospam@bigpond.com>
Subject: Re: Easiest way to do FTP without the module?
Message-Id: <2q04jcFol772U1@uni-berlin.de>
John Doe wrote:
> I am actually doing sftp (secure FTP) and have given up trying to
> build the sftp perl module on AIX; it is a lost cause. Net-FTP would
> be a breeze, but no unencrypted connection is allowed. :-(
> \
An alternative is to use scp (secure copy) instead. Its part of the ssh
suite.
gtoomey
------------------------------
Date: Sun, 05 Sep 2004 09:54:02 +1000
From: Sisyphus <kalinaubears@iinet.net.au>
Subject: Re: Mingw and perl.
Message-Id: <413a56c9$0$19717$5a62ac22@per-qv1-newsreader-01.iinet.net.au>
TLOlczyk wrote:
> I find that sometimes perl modules that include C code have problems
> with the Activestate distro ( which uses MSVC ). I don't particularly
> like cygwin because there are times when the cygwin dll can act
> flakey.
Generally, if the C code doesn't compile on MSVC-built perl, it also
doesn't compile on MinGW-built perl either. The problem is often with
the OS rather than the compiler - in which case cygwin may turn out to
to be the only solution.
> I've looked around for instructions on building perl within
> Mingw, but am finding the information confusing. Can anyone explain/
> recommend some web pages on using Mingw for perl?
>
When I build with MinGW I start with the source available from ActiveState:
http://aspn.activestate.com/ASPN/Downloads/ActivePerl/Source
Alternatively you could use the source available from cpan.
The top-level source directory contains a file called 'README.win32'
which contains the information you need.
Unfortunately, with their latest release (build 810), ActiveState have
altered 'makefile.mk' so that it works with dmake and MSVC instead of
dmake and MinGW. (I don't know whether the same changes have been made
to the makefile.mk that ships with cpan source.) So I used the
makefile.mk that I had used with build 809.
That seemed to work fairly well - test25 in ext/threads/t/thread.t
failed - I don't know why - haven't looked, haven't worried, though I
probably should. (I also always get some failures in io/fs.t and
op/stat.t which I assume is because I'm building on a FAT rather than
NTFS file system.)
I'll email you the actual makefile.mk I ran to build my 810 (perl 5.8.4).
Hth.
Cheers,
Rob
--
To reply by email u have to take out the u in kalinaubears.
------------------------------
Date: Sat, 4 Sep 2004 19:03:29 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: multiple regex pattern matching per line?
Message-Id: <slrncjkluh.igq.tadmc@magna.augustmail.com>
Darius <dmedhora@yahoo.com> wrote:
> I need to correct the title below. Can you help?
>
> Lets say I have a line like this below:
>
><word_word1 string="start" date="2004-09-02 07:33:22" id="2033878"
> word_id="2000589" get_id="8647" ><word name="MOVIE"><film
> title="S"things Gotta Give" the_number="531780"
> /></word></word_word1><film title="S'"e Gotta Give"
> the_number="531780" />
>
> This should be one continuous line, no new lines inbetween.
Have you seen the Posting Guidelines that are posted here frequently?
If you say it "in Perl" then you don't need ambiguous caveats like that:
my $line = '<word_word1 string="start" date="2004-09-02 07:33:22"'
. ' id="2033878" word_id="2000589" get_id="8647" >'
...
> How do I correct the tag 'title'
There *are no* "title" tags in the data you posted.
There are only "word", "word_word1" and "file" tags.
> so that its ALWAYS correct and reads
> as title="Somethings Gotta Give"
How are we supposed to know that a double quote should be
replaced with "ome" ?
> So there are 2 changes required here..
How are we supposed to know that "'"e" should be
replaced with "omethings" ?
> Please help urgently.
If it is urgent, then Usenet is the wrong place to go!
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Sat, 04 Sep 2004 22:41:12 -0000
From: Mike <mikee@mikee.ath.cx>
Subject: Re: packing floats?
Message-Id: <10jkh48312jqr61@corp.supernews.com>
In article <chd23k$dj0$1@slavica.ukpost.com>, Brian McCauley wrote:
>
>
> Mike wrote:
>
>> I'm playing with some code and I want to check that a given
>> array is unique. I'm trying to take the values (18) and pack
>> them into a piece of memory for comparison. Each array packed
>> I think should be 18*4=72 bytes. With this 72 byte string stuck
>> into a hash then I can easily tell if I have a unique entity.
>> My question is how to (and what is efficient) pack the values
>> into a string? These are floats and I'm not interested in
>> maintaining the actual float representation for this portion of
>> my code.
>
> The term 'hash' (in the normal sense as oppposed to Perl's synonym for
> associative array) and also your assertion that you are "not interested
> in maintaining the actual float representation" implies a lossy
> encoding. There is no gurantee that to inputs will not yield the same
> hash. IS that OK? In a Perl HASH (i.e. associative array) this is not
> an issue as for each hashed key value there is a list of actual
> key/value pairs.
>
>> I've tried:
>>
>> my $hash = pack('a18', @floats);
>> my $hash = pack('h18', @floats);
>>
>> but they've not worked.
>
> Read the desciption of the 'a' and 'h' in the doumentation of pack().
>
> > What does?
>
> Then look alongside these for another character that does what you
> evidently want. (Hint: it has the word 'float' in the description).
>
> Of couse it may not necessarily be 72 bytes, it'll be 1 times whatever
> the number of bytes is in a single-precision float in the native format.
>
> Of course by converting to single precision it is possible that numbers
> that would have compared unequal with == will compare equal in the
> 'hash'. Then again you should never reley on == with floating point
> numbers anyhow.
>
> Most people would not bother with pack and just use "@floats" - is
> memory really that tight? (Of course stringification also results in a
> loss of precision).
>
What I'm looking for is equal to:
int i;
float f[18];
for(i = 0; i < 18; i++) {
f[i] = genome[i];
}
....
int individualCompare(Individual a, Individual b)
{
return memcmp(a->genome, b->genome, 18 * sizeof(float));
}
....
Individual population[100];
...
int i, j;
for(i = 0; i < 99; i++) {
for(j = i + 1; j < 100; j++) {
if(individualCompare(population[i], population[j])) {
(void) printf("individuals are different\n");
}
}
}
------------------------------
Date: Sun, 05 Sep 2004 03:22:43 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: packing floats?
Message-Id: <x7pt51jt7x.fsf@mail.sysarch.com>
>>>>> "M" == Mike <mikee@mikee.ath.cx> writes:
<snip of whole quote. please learn to edit>
M> What I'm looking for is equal to:
M> int i;
M> float f[18];
M> for(i = 0; i < 18; i++) {
M> f[i] = genome[i];
M> }
and did you see my post about pack 'd'?
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: Sun, 05 Sep 2004 12:30:45 -0000
From: Mike <mikee@mikee.ath.cx>
Subject: Re: packing floats?
Message-Id: <10jm1nl5k7mokc8@corp.supernews.com>
In article <x7pt51jt7x.fsf@mail.sysarch.com>, Uri Guttman wrote:
>>>>>> "M" == Mike <mikee@mikee.ath.cx> writes:
>
><snip of whole quote. please learn to edit>
>
> M> What I'm looking for is equal to:
>
> M> int i;
> M> float f[18];
> M> for(i = 0; i < 18; i++) {
> M> f[i] = genome[i];
> M> }
>
> and did you see my post about pack 'd'?
>
> uri
>
Yes, but I didn't find the 'd' in 'perldoc -f pack'.
Did I miss it here or should I look someplace else?
Mike
------------------------------
Date: Sun, 05 Sep 2004 12:16:24 +1000
From: Gregory Toomey <nospam@bigpond.com>
Subject: Re: print Location to blank window?
Message-Id: <2pvb6aFortv3U1@uni-berlin.de>
krakle wrote:
>
> For the morons of this thread what Travis is asking: Is there away to
> use the Location header to target a new browser window or an existing
> one or a frame...
> And the answer is, surprisingly to most, yes. Use:
If that is what HE was asking, why do YOU need to paraphrasew it?
gtoomey
------------------------------
Date: Sun, 05 Sep 2004 08:51:00 -0400
From: "yusufdestina" <joericochuyt@msn.com>
Subject: Sending vars from Perl to PHP
Message-Id: <93f58ca8c95f055b703b557e8c1d1049@localhost.talkaboutprogramming.com>
Hi folks..
simple question, but to much for me :(
I want to send some vars from Perl to a php script on my server and
execute the php script.
This is what i have:
Perl script:
------------
print "Value to send: ";
$value= <STDIN>;
print "Sending $value to localhost\n";
$url = "http://localhost/testPerl.php?test=$value";
------------
PHP script:
------------
<?php
$received = $_GET['test'];
print "Value received: $received";
?>
------------------------------------------------------------
tnx for helping me :)
------------------------------
Date: Sun, 05 Sep 2004 10:44:04 GMT
From: "blnukem" <bill@hotmail.com>
Subject: Re: Update multiple lines in a flat file from array
Message-Id: <U5C_c.21883$lv3.6386210@news4.srv.hcvlny.cv.net>
incoming array:
foreach $Pair (@Pairs) {
($UniqeID, $Quantity) = split(/=/, $Pair);
}
"Paul Lalli" <mritty@gmail.com> wrote in message
news:chcanf$mjt$1@misc-cct.server.rpi.edu...
> blnukem wrote:
> > I looking for a simple way to update multiple lines in a flat file from
> > incoming array with multiple values the file structure goes like this:
> > Part-number | Name | Quantity
> >
> > The file looks like this:
> >
> > 123456|headlamp|6
> > 123457|camshaft|3
> > 123458|tire|8
> > 123459|wipperblades|10
> >
> > The updated incoming values look like this
> > Part-number | NEW Quantity
> >
> > 123457 4
> > 123459 8
>
> You said the new values are from "incoming array". The above doesn't
> look anything like a Perl array. Whenever possible, speak Perl, not
> English. Show us exactly from where and how your data is arriving.
>
> > So what I need it to do is update the flat file so it will look like
this:
> >
> > 123456|headlamp|6
> > 123457|camshaft|4
> > 123458|tire|8
> > 123459|wipperblades|8
> >
> > I cant seem to make it work without getting multiple duplicate entry's
>
> What exactly have you tried? Post your attempt, and we can help you see
> where you went wrong.
>
> Paul Lalli
------------------------------
Date: Sun, 05 Sep 2004 08:05:16 -0400
From: Paul Lalli <mritty@gmail.com>
Subject: Re: Update multiple lines in a flat file from array
Message-Id: <cheven$1tv$1@misc-cct.server.rpi.edu>
[top posting rearranged as it should be]
blnukem wrote:
> "Paul Lalli" <mritty@gmail.com> wrote
>>blnukem wrote:
>>
>>>I looking for a simple way to update multiple lines in a flat file from
>>>incoming array with multiple values the file structure goes like this:
>>>Part-number | Name | Quantity
>>>
>>>The file looks like this:
>>>
>>>123456|headlamp|6
>>>123457|camshaft|3
>>>123458|tire|8
>>>123459|wipperblades|10
>>>
>>>The updated incoming values look like this
>>>Part-number | NEW Quantity
>>>
>>>123457 4
>>>123459 8
>>
>>You said the new values are from "incoming array". The above doesn't
>>look anything like a Perl array. Whenever possible, speak Perl, not
>>English. Show us exactly from where and how your data is arriving.
>>
> incoming array:
>
> foreach $Pair (@Pairs) {
> ($UniqeID, $Quantity) = split(/=/, $Pair);
> }
>>>So what I need it to do is update the flat file so it will look like
>>>this:
>
>>>123456|headlamp|6
>>>123457|camshaft|4
>>>123458|tire|8
>>>123459|wipperblades|8
>>>
>>>I cant seem to make it work without getting multiple duplicate entry's
>>
>>What exactly have you tried? Post your attempt, and we can help you see
>>where you went wrong.
First, please don't top post. That means please post your reply below
what you are replying to.
Second, you haven't replied to the second part of my post. Please post
the code that you claim isn't working for you. We can't help you debug
your program if we can't see your code.
Paul Lalli
------------------------------
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 6962
***************************************
