[11401] in Perl-Users-Digest
Perl-Users Digest, Issue: 5002 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Feb 26 16:27:27 1999
Date: Fri, 26 Feb 99 13:20:20 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Fri, 26 Feb 1999 Volume: 8 Number: 5002
Today's topics:
Re: The crypt() function is unimplemented due to excess dturley@pobox.com
Re: The crypt() function is unimplemented due to excess dturley@pobox.com
Re: The crypt() function is unimplemented due to excess (Mark P.)
Re: The crypt() function is unimplemented due to excess droby@copyright.com
Re: The crypt() function is unimplemented due to excess dturley@pobox.com
Re: The crypt() function is unimplemented due to excess <donny@impulsesoftware.com>
Re: The crypt() function is unimplemented due to excess <Allan@due.net>
Re: The crypt() function is unimplemented due to excess <jeromeo@atrieva.com>
Re: The crypt() function is unimplemented due to excess (Mark P.)
Re: The millennium cometh -- eventually <Russell_Schulz@locutus.ofB.ORG>
Re: The millennium cometh -- eventually (I R A Aggie)
to be more specific: <brandeda@se.bel.alcatel.be>
Tricky input problem... (Kirk Bauer)
Re: Tricky input problem... (M.J.T. Guy)
Re: Tricky input problem... kirk@kaybee.org
Re: Tricky input problem... <Philip.Newton@datenrevision.de>
uninitialized value question (Rudy Fister)
Re: uninitialized value question (Bart Lateur)
Re: uninitialized value question (Larry Rosler)
unpack on binary fields henry@solcom.co.uk
URL Redirect based on REMOTE_HOST - Help Needed <mig@isis.ie>
Re: URL Redirect based on REMOTE_HOST - Help Needed <root@redbox.caroline.net>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 23 Feb 1999 12:51:44 GMT
From: dturley@pobox.com
Subject: Re: The crypt() function is unimplemented due to excessive paranoia
Message-Id: <7au88u$6tg$1@nnrp1.dejanews.com>
In article <36D1CA58.CA4CB6F2@impulsesoftware.com>,
Donny Widjaja <donny@impulsesoftware.com> wrote:
> Hi,
>
> I have a basic question about Crypt.pm. I encryted a text by using
> Crypt.pm, but I can't find the de-crypt function. Can someone tell me
> to decrypt a function?
You can't 'decrypt' crypt(). That's the whole point. You can check other
encrypted text to see if it matches, but you can't un-encrypt the original
text. --
____________________________________
David Turley
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Sun, 21 Feb 1999 20:03:31 GMT
From: dturley@pobox.com
Subject: Re: The crypt() function is unimplemented due to excessive paranoia
Message-Id: <7apoqg$deg$1@nnrp1.dejanews.com>
In article <36d04cda.45102223@news.ionet.net>,
mag@imchat.com (Mark P.) wrote:
> I'm using CGI.PM to parse the form and have come across this little
> tidbit thats killing my script. Is this coming from CGI.PM or what?
The mesage is coming from Perl. (I'm guessing you are running a windows port?)
crypt() is not compiled in because this great country of ours is so paranoid.
Go to http://www.pdv-systeme.de/users/martinv/Crypt.pm and save this file. Put
it in your Perl path and do
use Crypt;
near the top of your script. This is a Perl implementation of crypt() by
Martin Vorlaender that works the same.
BTW, this question gets asked and answered practically every week. You could
have save yoruself some time by searching the news archives like dejanews.
--
____________________________________
David Turley
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Mon, 22 Feb 1999 01:00:06 GMT
From: mag@imchat.com (Mark P.)
Subject: Re: The crypt() function is unimplemented due to excessive paranoia
Message-Id: <36d0a9dc.19576108@news.ionet.net>
Hmmm, sorry I didn't do a search. I haven't seen a message of this
type before.
Well, I went and got the activestate package, which didn't
have NET::SMTP installed, so then I had to get Mail package or some
such package which contained SMTP.PM but installed it to
site\lib\mail. So now do I call smtp like this?
use site::lib::mail::SMTP;
Or, is there a Net SMTP package somewhere? To tell you the
truth, I'm thinking of going back to the older package and doing what
you said.
On Sun, 21 Feb 1999 20:03:31 GMT, dturley@pobox.com wrote:
>In article <36d04cda.45102223@news.ionet.net>,
> mag@imchat.com (Mark P.) wrote:
>> I'm using CGI.PM to parse the form and have come across this little
>> tidbit thats killing my script. Is this coming from CGI.PM or what?
>
>The mesage is coming from Perl. (I'm guessing you are running a windows port?)
>crypt() is not compiled in because this great country of ours is so paranoid.
>
>Go to http://www.pdv-systeme.de/users/martinv/Crypt.pm and save this file. Put
>it in your Perl path and do
>
>use Crypt;
>
>near the top of your script. This is a Perl implementation of crypt() by
>Martin Vorlaender that works the same.
>
>BTW, this question gets asked and answered practically every week. You could
>have save yoruself some time by searching the news archives like dejanews.
>
>--
>
>____________________________________
>David Turley
>
>-----------== Posted via Deja News, The Discussion Network ==----------
>http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Mon, 22 Feb 1999 16:55:46 GMT
From: droby@copyright.com
Subject: Re: The crypt() function is unimplemented due to excessive paranoia
Message-Id: <7as26c$a8e$1@nnrp1.dejanews.com>
In article <7apoqg$deg$1@nnrp1.dejanews.com>,
dturley@pobox.com wrote:
>
> BTW, this question gets asked and answered practically every week. You could
> have save yoruself some time by searching the news archives like dejanews.
>
Actually, a Deja News search for keywords crypt and paranoia and dates in 1998
turned up 32 results for me. This included questions, responses and
"false-positives", so I suspect "practically every week" may be a slight
exaggeration.
I'm curious though about what frequency is necessary for faqness. I suspect
"practically every week" should be, but I'm not sure about "once a month or
so", which seems to be the case in this instance.
How do we decide what goes into the FAQ anyway?
And will we take the y2k faq out after the scare's over? ;-)
--
Don Roby
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Mon, 22 Feb 1999 18:53:21 GMT
From: dturley@pobox.com
Subject: Re: The crypt() function is unimplemented due to excessive paranoia
Message-Id: <7as92r$h46$1@nnrp1.dejanews.com>
In article <36d0a9dc.19576108@news.ionet.net>,
mag@imchat.com (Mark P.) wrote:
> Well, I went and got the activestate package, which didn't
> have NET::SMTP installed, so then I had to get Mail package or some
> such package which contained SMTP.PM but installed it to
> site\lib\mail. So now do I call smtp like this?
> use site::lib::mail::SMTP;
> Or, is there a Net SMTP package somewhere? To tell you the
> truth, I'm thinking of going back to the older package and doing what
> you said.
So what is the question? Is it about crypt() or SMTP? If you need Net::SMTP
you install the libnet package using ppm.
>perl ppm.pl libnet
Installing modules with Active Perl is described in the docs that comes with
it.
--
____________________________________
David Turley
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Mon, 22 Feb 1999 21:21:11 GMT
From: Donny Widjaja <donny@impulsesoftware.com>
Subject: Re: The crypt() function is unimplemented due to excessive paranoia
Message-Id: <36D1CA58.CA4CB6F2@impulsesoftware.com>
Hi,
I have a basic question about Crypt.pm. I encryted a text by using
Crypt.pm, but I can't find the de-crypt function. Can someone tell me
to decrypt a function?
Thank you.
dturley@pobox.com wrote:
>
> In article <36d04cda.45102223@news.ionet.net>,
> mag@imchat.com (Mark P.) wrote:
> > I'm using CGI.PM to parse the form and have come across this little
> > tidbit thats killing my script. Is this coming from CGI.PM or what?
>
> The mesage is coming from Perl. (I'm guessing you are running a windows port?)
> crypt() is not compiled in because this great country of ours is so paranoid.
>
> Go to http://www.pdv-systeme.de/users/martinv/Crypt.pm and save this file. Put
> it in your Perl path and do
>
> use Crypt;
>
> near the top of your script. This is a Perl implementation of crypt() by
> Martin Vorlaender that works the same.
>
> BTW, this question gets asked and answered practically every week. You could
> have save yoruself some time by searching the news archives like dejanews.
>
> --
>
> ____________________________________
> David Turley
>
> -----------== Posted via Deja News, The Discussion Network ==----------
> http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Mon, 22 Feb 1999 16:42:32 -0500
From: "Allan M. Due" <Allan@due.net>
Subject: Re: The crypt() function is unimplemented due to excessive paranoia
Message-Id: <7asijv$er3$1@camel19.mindspring.com>
Donny Widjaja wrote in message <36D1CA58.CA4CB6F2@impulsesoftware.com>...
:Hi,
:I have a basic question about Crypt.pm. I encryted a text by using
:Crypt.pm, but I can't find the de-crypt function. Can someone tell me
:to decrypt a function?
Well I could tell you to, but you won't be able to do it <g>. Crypt is
one-way encryption. If you encrypt the same word twice, using the same
salt, you will get the same result. This allows you to do things like
verify passwords, but you cannot decrypt crypt.
HTH
AmD
------------------------------
Date: Mon, 22 Feb 1999 13:34:50 -0800
From: Jerome O'Neil <jeromeo@atrieva.com>
To: Donny Widjaja <donny@impulsesoftware.com>
Subject: Re: The crypt() function is unimplemented due to excessive paranoia
Message-Id: <36D1CD79.1D5C4315@atrieva.com>
Donny Widjaja wrote:
>
> Hi,
>
> I have a basic question about Crypt.pm. I encryted a text by using
> Crypt.pm, but I can't find the de-crypt function. Can someone tell me
> to decrypt a function?
There is no decrypt function. There is no function that will unencrypt
cleartext encrypted with crypt().
> Thank you.
You're welcome.
--
Jerome O'Neil, Operations and Information Services
Atrieva Corporation, 600 University St., Ste. 911, Seattle, WA 98101
jeromeo@atrieva.com - Voice:206/749-2947
The Atrieva Service: Safe and Easy Online Backup http://www.atrieva.com
------------------------------
Date: Tue, 23 Feb 1999 01:44:01 GMT
From: mag@imchat.com (Mark P.)
Subject: Re: The crypt() function is unimplemented due to excessive paranoia
Message-Id: <36d20770.109068622@news.ionet.net>
On Mon, 22 Feb 1999 18:53:21 GMT, dturley@pobox.com wrote:
Well it was about crypt but then when I went to the
activestate package it became about Net::SMTP. I've since corrected
both problems thanks to everyones help.
Thank you all very much!
>So what is the question? Is it about crypt() or SMTP? If you need Net::SMTP
>you install the libnet package using ppm.
>
>>perl ppm.pl libnet
>
>Installing modules with Active Perl is described in the docs that comes with
>it.
>
>--
>
>____________________________________
>David Turley
>
>-----------== Posted via Deja News, The Discussion Network ==----------
>http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Wed, 24 Feb 1999 11:02:06 -0500
From: Russell Schulz <Russell_Schulz@locutus.ofB.ORG>
Subject: Re: The millennium cometh -- eventually
Message-Id: <19990224.110206.3N7.rnr.w164w@locutus.ofB.ORG>
tchrist@mox.perl.com (Tom Christiansen) writes:
> The real reason I wrote the code was that people were using the first
> two digits of the four-digit year to indicate the century, which is so
> amazingly wrong
what, the 1900s? that sounds right to me.
--
Russell_Schulz@locutus.ofB.ORG Shad 86c
------------------------------
Date: 24 Feb 1999 17:32:14 GMT
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: The millennium cometh -- eventually
Message-Id: <slrn7d8e1p.b63.fl_aggie@enso.coaps.fsu.edu>
On Wed, 24 Feb 1999 11:02:06 -0500, Russell Schulz
<Russell_Schulz@locutus.ofB.ORG> wrote:
+ tchrist@mox.perl.com (Tom Christiansen) writes:
+
+ > The real reason I wrote the code was that people were using the first
+ > two digits of the four-digit year to indicate the century, which is so
+ > amazingly wrong
+
+ what, the 1900s? that sounds right to me.
Except that this is the *20th* century...
James
------------------------------
Date: Wed, 24 Feb 1999 21:14:10 +0100
From: David Van den Brande <brandeda@se.bel.alcatel.be>
Subject: to be more specific:
Message-Id: <36D45D92.4EC07895@se.bel.alcatel.be>
I read the HTML page into a variable using using LWP::Simple .
------------------------------
Date: 24 Feb 1999 21:41:38 GMT
From: gt5918a@acmex.gatech.edu (Kirk Bauer)
Subject: Tricky input problem...
Message-Id: <7b1rmi$in9@catapult.gatech.edu>
Okay... I need to input single characters from the user with the
following requirements (on a Linux machine):
1) No carriage return necessary (i.e. returns as soon as one
character is hit)
2) Buffered
3) Character is not echoed to screen
4) Command returns quickly if no characters waiting
I have tried a lot of things, and I can only figure out how to
get 3 out of these 4 requirements to work at the same time. Here
is how I can currently do it best:
sub GetKey {
my $Read;
ReadMode("cbreak", STDIN);
$Read = ReadKey(.05,STDIN);
ReadMode("original", STDIN);
if ($Read) {
return $Read;
}
else {
return 0;
}
}
So, here is what this function does depending on whether there
is something waiting in the buffer:
Something waiting in buffer:
Reads only one character w/ no carriage return necessary
*sometimes* the character is echoed to the screen
(this is the part I want to get rid of)
returns the key read
Something not waiting in buffer:
Waits for 0.05 seconds for a character
returns 0 if no character comes in that time
It seems that I can either set a ReadMode of 'chbreak' *or*
'noecho', but not both...
Any help would be *greatly* appreciated.
--
Kirk Bauer -- Georgia Tech -- kirk@kaybee.org <== Finger for PGP
http://www.kaybee.org/~kirk ResNet RTA Computer Engineering
GT Sport Parachuting Club! http://cyberbuzz.gatech.edu/skydive
------------------------------
Date: 25 Feb 1999 17:25:28 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: Tricky input problem...
Message-Id: <7b4128$k3u$1@pegasus.csx.cam.ac.uk>
Kirk Bauer <gt5918a@acmex.gatech.edu> wrote:
>Okay... I need to input single characters from the user with the
>following requirements (on a Linux machine):
It's not tricky if you read the FAQ - specifically perlfaq5
How can I read a single character from a file? From the keyboard?
And I found this in seconds by trying `perldoc -q character'.
Mike Guy
------------------------------
Date: 26 Feb 1999 00:18:37 GMT
From: kirk@kaybee.org
Subject: Re: Tricky input problem...
Message-Id: <7b4p8t$oim$1@news-int.gatech.edu>
M.J.T. Guy <mjtg@cus.cam.ac.uk> wrote:
: It's not tricky if you read the FAQ - specifically perlfaq5
: How can I read a single character from a file? From the keyboard?
: And I found this in seconds by trying `perldoc -q character'.
I should have said so in my original post, but I have indeed read
the FAQ and tried both of the solutions presented therein.
The first solution the FAQ presents (i.e. the 30-line one) works
perfectly... except for the fact that it will sit and wait until
a character finally comes in the buffer.
The second solution the FAQ presents is much simpler, and just
about the same thing I had come up with on my own. First, you
have to take the first parameter from ReadKey and change it to
something like .05 so that it won't wait forever. Even then,
the keys are still echoed to the screen.
Once again, I had 4 requirements. I said I could get 3 of
them working... but never all four:
1) Must return quickly if nothing is waiting
2) Must not echo anything to the screen
3) Must return after only one character typed w/ no carriage return reqd
4) Must buffer the input
--
Kirk Bauer -- Georgia Tech -- kirk@kaybee.org <== Finger for PGP
http://www.kaybee.org/~kirk ResNet RTA Computer Engineering
GT Sport Parachuting Club! http://cyberbuzz.gatech.edu/skydive
------------------------------
Date: Fri, 26 Feb 1999 10:21:09 +0100
From: Philip Newton <Philip.Newton@datenrevision.de>
Subject: Re: Tricky input problem...
Message-Id: <36D66785.4C75FC55@datenrevision.de>
kirk@kaybee.org wrote:
>
> Once again, I had 4 requirements. I said I could get 3 of
> them working... but never all four:
>
> 1) Must return quickly if nothing is waiting
> 2) Must not echo anything to the screen
> 3) Must return after only one character typed w/ no carriage return reqd
> 4) Must buffer the input
I still don't get it... what does number 4 mean? If it means what I
think it means, how do you reconcile it with "must return after only one
character typed"? That sounds like "must be unbuffered" to me.
Cheers,
Philip
------------------------------
Date: 26 Feb 1999 06:54:26 -0500
From: you@somehost.somedomain (Rudy Fister)
Subject: uninitialized value question
Message-Id: <36d68b72.0@usenet.lexmark.com>
I am new to programing and I am tring to learn Perl. Here is a section of my
script.
@Wordsss = split(/./, $TheLine);
$pmd = $Wordsss[1];
if ($Pmd eq $pmd){ next }
if ($Pmd ne $pmd) {
print "$TheLine\n"}
I get the following message with -w on
Use of uninitialized value at list.pl line 32, <INDB> chunk 860
Use of uninitialized value at list.pl line 33, <INDB> chunk 860.
The $TheLine also prints:
"System Filename : /team_ms1/team/projects/z_hfister_0105.pmd"
I have declared $Pmd = "pmd" earlier in the script. What is Perl tring to tell
me?
Thanks
Rudy fister
------------------------------
Date: Fri, 26 Feb 1999 14:53:56 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: uninitialized value question
Message-Id: <36d6b508.23283037@news.skynet.be>
Rudy Fister wrote:
> @Wordsss = split(/./, $TheLine);
> $pmd = $Wordsss[1];
> if ($Pmd eq $pmd){ next }
> if ($Pmd ne $pmd) {
> print "$TheLine\n"}
I'm not sure exactly what you're trying to accomplish, but:
* If you want to split on dots, use
split /\./
because dots are special in regexes, and
* The code snippet
$pmd = $Wordsss[1];
will extract the *second* item. the first item is number 0.
HTH,
Bart.
------------------------------
Date: Fri, 26 Feb 1999 07:27:47 -0800
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: uninitialized value question
Message-Id: <MPG.11405d4d8bc4d216989693@nntp.hpl.hp.com>
In article <36d68b72.0@usenet.lexmark.com>, on 26 Feb 1999 06:54:26 -
0500 you@somehost.somedomain says...
...
> @Wordsss = split(/./, $TheLine);
That means 'split on every character that is not a new-line', which
leaves nothing for @Wordsss. You want to split on a literal '.', so
use:
@Wordsss = split(/\./, $TheLine);
> $pmd = $Wordsss[1];
> if ($Pmd eq $pmd){ next }
> if ($Pmd ne $pmd) {
> print "$TheLine\n"}
The second test is redundant. If it isn't equal, it's unequal
(Aristotelian logic -- the excluded middle).
--
Larry Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Mon, 22 Feb 99 15:57:25
From: henry@solcom.co.uk
Subject: unpack on binary fields
Message-Id: <NEWTNews.919699412.8597.henry@procrusteus.solcom.co.uk>
I thought that
($foo, $bar) = unpack('B5B3', $somedata);
would extract 5 bits of $somedata's first byte into $foo and
the other three bits of $somedata's first byte into $bar
but it
extracts five bits of $somedata's first byte into $foo
and three bits of $somedata's second byte into $bar.
I thought that perl would have a slick way to do the former
without masking and shifting. Has it?
Regards
Henry
------------------------------
Date: Thu, 25 Feb 1999 02:05:02 -0000
From: "Mig" <mig@isis.ie>
Subject: URL Redirect based on REMOTE_HOST - Help Needed
Message-Id: <7b2b5a$7kq$1@scotty.tinet.ie>
Help! I'm looking for a script that I can integrate into a standard image
link, that will re-direct a user to a URL based on the 'tail-end' of the
REMOTE_HOST enviornmental variable.
Purpose? Our company is in 2 worldwide locations, and I want users when they
click on our banner (or a link) to be redirected to a website based on
whether they are *.uk (to our uk site) or *.anythingelse (to our US site).
Any takers??
A direct email copy appreciated if possible.
Mig.
Mig@isis.ie
------------------------------
Date: 25 Feb 1999 05:06:25 -0500
From: root <root@redbox.caroline.net>
Subject: Re: URL Redirect based on REMOTE_HOST - Help Needed
Message-Id: <hfsadcgu.fsf@redbox.caroline.net>
I think it should just be $remotehost=$ENV{REMOTE_HOST};, then just
pick it up with a regex modifier that picks up the final "text after"
dot. I'm too lazy to look that up for ya'... Anyway, now that I
answered you question, let me pose a question to you and the group.
How accurate do you think this data will be? I have heard arguments
in the advertising listserves that this data is very inaccurate. I am
not certain that this is true, but if anyone knows, I'm sure this
would be interesting to this person as well...
BTW: you get more responses if do not ask to be emailed directly,
because people know you don't subscribe to the NG, and therefore are
somewhat parasitic in nature, rather than symbiotic.
Good Luck,
Shane
------------------------------
Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
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 V8 Issue 5002
**************************************
