[16479] in Perl-Users-Digest
Perl-Users Digest, Issue: 3891 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Aug 2 18:20:44 2000
Date: Wed, 2 Aug 2000 15:20:29 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <965254829-v9-i3891@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Wed, 2 Aug 2000 Volume: 9 Number: 3891
Today's topics:
String to Integer oderus54@my-deja.com
Re: String to Integer <care227@attglobal.net>
Re: String to Integer (Greg Bacon)
Re: String to Integer <mauldin@netstorm.net>
Re: String to Integer <care227@attglobal.net>
Re: String to Integer <mauldin@netstorm.net>
Re: String to Integer <care227@attglobal.net>
Re: String to Integer <lr@hpl.hp.com>
Re: String to Integer (Greg Bacon)
Re: String to Integer <care227@attglobal.net>
Re: String to Integer oderus54@my-deja.com
Re: String to Integer <care227@attglobal.net>
Re: String to Integer <lr@hpl.hp.com>
Re: String to Integer <mauldin@netstorm.net>
Re: stripping - ? html tags <andre@UltraShell.Net>
Subclassing an opaque class <bobg@moonbase.zanshin.com>
Tk module for Windows NT gopal_bhat@my-deja.com
Value of undefined variable in activeperl <klaus@whitehat.dk>
Re: Variable Scope in Included Files <Jonathan.L.Ericson@jpl.nasa.gov>
Re: very cool routine <godzilla@stomp.stomp.tokyo>
Re: very cool routine <rbank@csf.edu>
Re: very cool routine <uri@sysarch.com>
What happened to $fh->input_record_separator ? (Andrew J. Perrin)
Re: Win32::ODBC & SQL Anywhere <gellyfish@gellyfish.com>
Writing XML via XML::DOM <travisp@seanet.com>
Re: WWWBoard.PL <saraj_martin@time-inc.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 02 Aug 2000 18:16:41 GMT
From: oderus54@my-deja.com
Subject: String to Integer
Message-Id: <8m9oi3$65e$1@nnrp1.deja.com>
Is there a function in perl that changes a string to an integer, for
example.
$blah = "123456";
# Now i want $num = 123456
?????????????
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Wed, 02 Aug 2000 14:59:51 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: String to Integer
Message-Id: <39886FA7.55C0474@attglobal.net>
oderus54@my-deja.com wrote:
>
> Is there a function in perl that changes a string to an integer, for
> example.
>
> $blah = "123456";
> # Now i want $num = 123456
> ?????????????
#/usr/bin/perl -w
use strict;
my $blah = "123456";
$blah *= 2;
print $blah;
output: 246912
$blah is a string, and an integer too. Perl is not typed like C, so
you don't have to declare variables as int in order for them to be
treated as integers.
Its all about how you use it...
------------------------------
Date: Wed, 02 Aug 2000 19:04:27 GMT
From: gbacon@HiWAAY.net (Greg Bacon)
Subject: Re: String to Integer
Message-Id: <sogs5rjadbm161@corp.supernews.com>
In article <8m9oi3$65e$1@nnrp1.deja.com>,
<oderus54@my-deja.com> wrote:
: Is there a function in perl that changes a string to an integer, for
: example.
:
: $blah = "123456";
: # Now i want $num = 123456
You want a decimal coding (dc). Get that in Perl with
$blah = "123456";
$blah =~ tr/0123456789//dc; # <- note the dc
Hope this helps,
Greg
--
Never call a man a fool. Borrow from him.
------------------------------
Date: Wed, 02 Aug 2000 18:57:23 GMT
From: Jim Mauldin <mauldin@netstorm.net>
Subject: Re: String to Integer
Message-Id: <39886E92.2A910BC3@netstorm.net>
oderus54@my-deja.com wrote:
>
> Is there a function in perl that changes a string to an integer, for
> example.
>
> $blah = "123456";
> # Now i want $num = 123456
$blah = "123";
$blah *= 2;
print $blah;
perldoc perldata
-- Jim
------------------------------
Date: Wed, 02 Aug 2000 15:32:32 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: String to Integer
Message-Id: <39887750.417DAC4E@attglobal.net>
Greg Bacon wrote:
>
> You want a decimal coding (dc). Get that in Perl with
>
> $blah = "123456";
> $blah =~ tr/0123456789//dc; # <- note the dc
>
Greg,
I just checked through perlop, and I see:
c Complement the SEARCHLIST.
d Delete found but unreplaced characters.
:If the /c modifier is specified, the SEARCHLIST
:character set is complemented. If the /d modifier
:is specified, any characters specified by SEARCHLIST
:not found in REPLACEMENTLIST are deleted.
When I ran this my output was 123456, but when I just
printed $blah, the output was the same. My understanding
has been that Perl with DWIM with the whole integer/string
issue, but is this correct?
------------------------------
Date: Wed, 02 Aug 2000 19:57:50 GMT
From: Jim Mauldin <mauldin@netstorm.net>
Subject: Re: String to Integer
Message-Id: <39887CB3.2A2028BB@netstorm.net>
Drew Simonis wrote:
>
> Greg Bacon wrote:
> >
> > You want a decimal coding (dc). Get that in Perl with
> >
> > $blah = "123456";
> > $blah =~ tr/0123456789//dc; # <- note the dc
> >
>
> Greg,
> I just checked through perlop, and I see:
>
> c Complement the SEARCHLIST.
> d Delete found but unreplaced characters.
>
Might be useful for a musician but pretty much useless in the context of
the original post.
$blah = "1 and a 2 and a 3 and a 4 ...";
$blah =~ tr/0-9//dc;
print $blah;
-- Jim
------------------------------
Date: Wed, 02 Aug 2000 16:17:33 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: String to Integer
Message-Id: <398881DD.3EAB3329@attglobal.net>
Jim Mauldin wrote:
>
> Might be useful for a musician but pretty much useless in the context of
> the original post.
>
> $blah = "1 and a 2 and a 3 and a 4 ...";
> $blah =~ tr/0-9//dc;
> print $blah;
>
Now I see the use. Thanks for that example, Jim.
------------------------------
Date: Wed, 2 Aug 2000 13:24:10 -0700
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: String to Integer
Message-Id: <MPG.13f22348d73eebb598ac29@nntp.hpl.hp.com>
In article <39887CB3.2A2028BB@netstorm.net> on Wed, 02 Aug 2000 19:57:50
GMT, Jim Mauldin <mauldin@netstorm.net> says...
> Drew Simonis wrote:
> >
> > Greg Bacon wrote:
> > >
> > > You want a decimal coding (dc). Get that in Perl with
^^^^^^^^^^^^^^^^^^^
> > > $blah = "123456";
> > > $blah =~ tr/0123456789//dc; # <- note the dc
^^^^^^^^^^^^^^^^^^^^^
> > Greg,
> > I just checked through perlop, and I see:
> >
> > c Complement the SEARCHLIST.
> > d Delete found but unreplaced characters.
>
> Might be useful for a musician but pretty much useless in the context of
> the original post.
>
> $blah = "1 and a 2 and a 3 and a 4 ...";
> $blah =~ tr/0-9//dc;
> print $blah;
Jim and Drew,
Did you really miss the implicit smiley in the nonsense highlighted
above?
Greg was producing a Perl Bowling no-op.
Consider yourselves to have been had! :-)
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Wed, 02 Aug 2000 21:01:43 GMT
From: gbacon@HiWAAY.net (Greg Bacon)
Subject: Re: String to Integer
Message-Id: <soh31nd1dbm30@corp.supernews.com>
In article <39887750.417DAC4E@attglobal.net>,
Drew Simonis <care227@attglobal.net> wrote:
: Greg Bacon wrote:
:
: > You want a decimal coding (dc). Get that in Perl with
: >
: > $blah = "123456";
: > $blah =~ tr/0123456789//dc; # <- note the dc
: >
:
: I just checked through perlop, and I see:
:
: c Complement the SEARCHLIST.
: d Delete found but unreplaced characters.
Oh, shoot. Sorry, I confuse easily. Try this.
$blah = "123456";
$num = ord($1) + 012 * $num - ord('0') while $blah =~ /(\d)/g
Greg
--
Don't worry about people stealing your ideas. If your ideas are any good,
you'll have to ram them down people's throats.
-- Howard Aiken
------------------------------
Date: Wed, 02 Aug 2000 17:15:59 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: String to Integer
Message-Id: <39888F8F.229447D0@attglobal.net>
Greg Bacon wrote:
>
>
> Oh, shoot. Sorry, I confuse easily. Try this.
>
> $blah = "123456";
> $num = ord($1) + 012 * $num - ord('0') while $blah =~ /(\d)/g
>
> Greg
I'm not falling for it twice!
------------------------------
Date: Wed, 02 Aug 2000 21:12:40 GMT
From: oderus54@my-deja.com
Subject: Re: String to Integer
Message-Id: <8ma2s4$emh$1@nnrp1.deja.com>
In article <8m9oi3$65e$1@nnrp1.deja.com>,
oderus54@my-deja.com wrote:
> Is there a function in perl that changes a string to an integer, for
> example.
>
> $blah = "123456";
> # Now i want $num = 123456
> ?????????????
>
> Sent via Deja.com http://www.deja.com/
> Before you buy.
>
Thanks for the help everyone.
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Wed, 02 Aug 2000 17:17:24 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: String to Integer
Message-Id: <39888FE4.B1172D98@attglobal.net>
Larry Rosler wrote:
>
> Consider yourselves to have been had! :-)
>
Its not nice to play with newbies! (referencing myself here)
------------------------------
Date: Wed, 2 Aug 2000 14:13:14 -0700
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: String to Integer
Message-Id: <MPG.13f22ec937758cf298ac2c@nntp.hpl.hp.com>
In article <soh31nd1dbm30@corp.supernews.com> on Wed, 02 Aug 2000
21:01:43 GMT, Greg Bacon <gbacon@HiWAAY.net> says...
...
> $blah = "123456";
> $num = ord($1) + 012 * $num - ord('0') while $blah =~ /(\d)/g
That produces a warning, because $num isn't initialized. But you're
getting there!
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Wed, 02 Aug 2000 21:29:27 GMT
From: Jim Mauldin <mauldin@netstorm.net>
Subject: Re: String to Integer
Message-Id: <39889236.F67B2838@netstorm.net>
Larry Rosler wrote:
>
> Jim and Drew,
>
> Did you really miss the implicit smiley in the nonsense highlighted
> above?
>
> Greg was producing a Perl Bowling no-op.
>
> Consider yourselves to have been had! :-)
>
Hmm ...
Processing, please wait ...
Scanning Greg Bacon posts ...
Evaluating competency level ...
Estimating ...
Results for Greg Bacon:
fustration level = 1
probability of posting Perl Bowling no-op: .887
Input name of next user: Larry Rosler\n
Processing ... please wait ...
What a great NG!
-- Jim
------------------------------
Date: Wed, 02 Aug 2000 21:43:32 GMT
From: Andre van Straaten <andre@UltraShell.Net>
Subject: Re: stripping - ? html tags
Message-Id: <8C0i5.17966$a61.852473@news-east.usenetserver.com>
For many purposes you can use the Lynx browser. It works also with tables.
The HTML parser modules should do the job, too. I never used them, but on MS Windows this may fit
better together than the solution with the Lynx browser (which is also for MS OS's available).
See a CPAN site for the HTML modules.
-- avs
john kelly <kellym36@drink.bt.co.uk> wrote:
> evenin all,
> im pretty new to perl and ive got to write this script that pulls text
> out of an HTML page.
> all the information is in a table - arranged like this....
> '<tr><td>some stuff to extract</td><td>some more</td><td>and
> more</td></tr>'
> it needs to come out looking like this...
> some stuff to extract
> some more
> and more
> currently i read the HTML into a long, single line string and ive been
> splitting it up
> at the <td> tags, this is fine but i cant come up with an efficient way
> of
> removing all the other tags ie<html></html>etc...
> - something like -
> $string =~ s/<( / or nothing)(not <td>)(anythingelse)>//g;
> would do the job but im a bit slow so i can't figure out how to do it.
> -
> cheers :)
> j
--
Andre van Straaten
http://www.vanstraatensoft.com
______________________________________________
flames please to /dev/null@vanstraatensoft.com
------------------------------
Date: 02 Aug 2000 12:30:20 -0700
From: Bob Glickstein <bobg@moonbase.zanshin.com>
Subject: Subclassing an opaque class
Message-Id: <m1punrh35f.fsf@moonbase.zanshin.com>
When I subclass someone else's class, how can I add my own instance
variables?
When I subclass my own class, I simply do this:
package MySubclass;
@ISA = qw(MySuperclass);
sub new {
my $self = new MySuperclass(...);
$self->{sub_instance_var} = ...;
bless $self, ...;
}
because I know the composition of a MySuperclass object. But when the
superclass is someone else's, $self may not be a HASH reference at
all; and if it is, `sub_instance_var' may collide with a member
already in the HASH.
I suspect the answer has something to do with typeglobs, but although
I'm a Perl expert in every other way, typeglobs remain a big mystery
to me.
Many thanks in advance,
- Bob
------------------------------
Date: Wed, 02 Aug 2000 19:11:15 GMT
From: gopal_bhat@my-deja.com
Subject: Tk module for Windows NT
Message-Id: <8m9roe$8v1$1@nnrp1.deja.com>
Hi,
I got Active-Perl(5.006) for WinNT and I wanted to install Tk module
(perl -e 'use Tk' should work forst). Please post a reply to this
posting if any of you know a place on the net, where I can download
compiled Tk module for Win NT.
thanks
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Wed, 2 Aug 2000 22:36:27 +0200
From: "Klaus Lyngsoe" <klaus@whitehat.dk>
Subject: Value of undefined variable in activeperl
Message-Id: <zC%h5.508$Ck3.9324@news.get2net.dk>
I am about to move my website from a server running windows NT with
activeperl to a server running Linux and 'regular' perl :)
I have crypted my users password like this:
$cryptpass = crypt ($password, $salt);
The problem is that I did not give $salt any value before using it to
encrypt the password. It works fine in active perl, but returns $cryptpass
with no value on the linux-server. I believe it means that an undefined $var
has a value in activeperl.
Can anybody help me out and tell me what that value of an undefined $salt in
activeperl is ?
(I have tried to make the script write the value of $salt to a file - but
the file was still 0 byte after the script was done .. )
Kind regards
Klaus Lyngsoe
------------------------------
Date: Wed, 02 Aug 2000 10:56:48 -0700
From: Jon Ericson <Jonathan.L.Ericson@jpl.nasa.gov>
Subject: Re: Variable Scope in Included Files
Message-Id: <398860E0.AE287B55@jpl.nasa.gov>
bluearchtop@my-deja.com wrote:
> What I am doing is taking out all error messages from a script so the
> language can be easily translated to other languages. This works fine
> when it is a boilerplate, static message, but when there are variables
> involved, they are out of scope in the required file. I'm assuming it
> is because the file is included before the variables are even set.
In that case you probably need printf and its brother sprintf. The
following is untested:
english.msg:
$like = "I like %s.\n";
1;
espaņol.msg:
$like = "Me gusta %s.\n";
1;
script:
$lang = $ARGV[0];
require "$lang.msg";
printf $like, 'Perl';
$ script english
I like Perl.
$ script espaņol
Me gusta Perl.
> I know I can solve the problem by post parsing the error strings, but I
> wanted to know if there was an easier way first.
You may need to fall back to parsing the error strings if the word order
needs to be changed from one language to another:
English: printf "I like %s %s.\n", 'big', 'cars';
Espaņol: printf "Me gusta %s %s.\n", 'autos', 'grande';
Jon
--
Knowledge is that which remains when what is
learned is forgotten. - Mr. King
------------------------------
Date: Wed, 02 Aug 2000 11:15:11 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: very cool routine
Message-Id: <3988652F.9B46FD66@stomp.stomp.tokyo>
Uri Guttman rudely blathered:
> > Godzilla! politely wrote:
(snipped rude idiotic childish blatherings)
I find great humor in and enjoy a good laugh in reading
your jackass braying from your wrong end. I am certain
this humorous noumenon is directly related to your
head location.
Godzilla!
Love me two times and I will rock you.
http://la.znet.com/~callgirl3/twotimes.mid
------------------------------
Date: Wed, 2 Aug 2000 15:50:40 -0600
From: "Robin Bank" <rbank@csf.edu>
Subject: Re: very cool routine
Message-Id: <8ma51f$o2s$1@reader.nmix.net>
splice ?
*embarassed look*
However...
The splice function is not an operator, it is a function, and therefore no
less big and bulky than mine... In fact, probably more so, because mine is
the bear minimum ammount of code needed. (pretty much)
Later,
--
< Robin Bank >
{ Web Design / Programming }
[ Internet @ Cybermesa ] [ www.cybermesa.com ] [ 505 - 988 - 9200 ]
------------------------------
Date: Wed, 02 Aug 2000 22:04:54 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: very cool routine
Message-Id: <x7og3b2ubd.fsf@home.sysarch.com>
>>>>> "RB" == Robin Bank <rbank@csf.edu> writes:
RB> splice ?
RB> *embarassed look*
you should.
RB> The splice function is not an operator, it is a function, and
RB> therefore no less big and bulky than mine... In fact, probably
RB> more so, because mine is the bear minimum ammount of code
RB> needed. (pretty much)
hahaha! as if your perl code could be faster than the internal splice
code. that is the whole purpose of having builtin functions, to make
commonly done things faster and easier to code.
i see you will soon worship at the feet of that golden troll,
moronzilla. please leave and never darken my towels again!
:-)
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: 02 Aug 2000 17:24:09 -0500
From: aperrin@demog.berkeley.edu (Andrew J. Perrin)
Subject: What happened to $fh->input_record_separator ?
Message-Id: <87snsn5mk6.fsf@achebe.perrins>
Greetings. I just loaded 5.6.0 (using linux/debian), and the following
code snippet is now broken:
...
my $fh = new FileHandle($fn);
$fh->input_record_separator('#---#---#---#');
...
The error msg is:
input_record_separator is not supported on a per-handle basis
I can't find mention of this in perldiag or perldoc FileHandle. What
happened? How can I have similar functionality?
Thanks.
Andy Perrin
------------------------------
Date: 2 Aug 2000 21:49:49 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Win32::ODBC & SQL Anywhere
Message-Id: <8ma1hd$gu5$1@orpheus.gellyfish.com>
On Tue, 1 Aug 2000 09:56:36 -0400 Jeff Heine wrote:
> Hi,
> I'm trying to add a new DSN for a SQL Anywhere database dynamically at
> runtime, and I need to use the Start=... option setting as follows:
>
> Win32::ODBC::ConfigDSN(ODBC_ADD_DSN, 'Sybase SQL Anywhere 5.0'
> , ("DSN=USPS_AJ",
> ...
> , 'Start = C:\sqlany50\win32\dbclient.exe -x tcpip{host=153.84.100.5}
> USPS_AJ'
> ))
>
> it gives me the following error because of the 'Start = ' line:
>
> ---------- Error Report: ----------
> Errors for the package:
> Connection Number:
> Error number: 911
> Error message: "Illegal use of reserved characters []{}(),?*!@;"
> -----------------------------------
>
> Who's giving this error? Perl, ODBC, SQL Anywhere?
> How can I specify a TCPIP host address within my startline without usng the
> squirley brackets?
It certainly isnt a Perl error - I would suggest that you would probably
get a better answer in a group that discusses ODBC issues rather than here.
/J\
--
yapc::Europe in assocation with the Institute Of Contemporary Arts
<http://www.yapc.org/Europe/> <http://www.ica.org.uk>
------------------------------
Date: Wed, 2 Aug 2000 13:36:56 -0700
From: "Travis Pruitt" <travisp@seanet.com>
Subject: Writing XML via XML::DOM
Message-Id: <398886ed$1_1@news.nwlink.com>
I've found lots of examples of parsing XML via XML::DOM, but anyone know of
some good examples of writing well-formed XML documents? I'm somewhat of a
newbie to Perl and am stuck...
Thanks!
Travis
------------------------------
Date: Wed, 02 Aug 2000 17:18:30 -0400
From: Sara Jane Martin <saraj_martin@time-inc.com>
Subject: Re: WWWBoard.PL
Message-Id: <39889026.AD13F3F6@time-inc.com>
Neil Kandalgaonkar wrote:
> Oh, and by the way, it is among the worst code I have ever seen. Someone
> recently asked about how bad Matt's scripts were and I was tempted to
> include a dissection of wwwboard.pl.
>
> Story: a client calls me up, "we have a bulletin board script and we'd like
> to have 'next' and 'previous' buttons for each posting. Oh and we want to
> be able to delete postings too." I said sure -- how hard could THAT be?
> (This is 1997).
>
> * It is extremely likely to get corrupted, since the script does no
> locking of any kind (at least in '97), and multiple CGI processes can
> and will modify it simultaneously.
> --
> Neil Kandalgaonkar <neil@brevity.org>
I recently went to www.worldwidemart.com/scripts to look at Matt's
scripts
simply because I was curious as to how they could be so bad that they
have
earned such a widespread reputation.
Now, I can't really distinguish between good perl and bad perl because I
am
a new programmer but I'm curious as to whether or not the "security
patches"
that are advertized in the new release do much good or not. As Neil
said, he
found many problems with wwwboard in 1997 but have there been any
significant
improvements since then?
I'm not saying this to promote Matt's scripts but as a person who is new
to
perl, I like to "play with" bits of new scripts that I can find to help
myself
out as a programmer and I was wondering if it was even worth it with
Matt's
scripts. Or are they so bad that they would just confuse me (and be
potentially
harmful)?
Sara
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
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: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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 V9 Issue 3891
**************************************