[22910] in Perl-Users-Digest
Perl-Users Digest, Issue: 5130 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jun 24 11:05:45 2003
Date: Tue, 24 Jun 2003 08: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 Tue, 24 Jun 2003 Volume: 10 Number: 5130
Today's topics:
Can't locate @INC & not finding files in local director (Jennifer)
Re: Can't locate @INC & not finding files in local dire <thens@nospam.com>
Distributed CGI script in taint mode (re-post) <mailbox@gunnar.cc>
Re: Distributed CGI script in taint mode (re-post) (Helgi Briem)
Help needed with Net::Telnet <shotoku.taishi@virgin.net>
Re: Issues grabbing UTF8 web page <flavell@mail.cern.ch>
Re: Resource for Perl Newbies <REMOVEsdnCAPS@comcast.net>
Re: Resource for Perl Newbies (Tad McClellan)
s/// substitution with capture / memory in a variable <aburger@rogers.com>
Re: s/// substitution with capture / memory in a variab <usenet@dwall.fastmail.fm>
Re: soap::lite hellp needed with sms <mike_solomon@lineone.net>
Re: unicode in Image::Magick (hex values and braces pro (Anno Siegel)
Re: unicode in Image::Magick (hex values and braces pro <flavell@mail.cern.ch>
Re: using SOAP::Lite to call other services. <katz@underlevel.net>
Re: V Newbie: Installing Perl modules (Helgi Briem)
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 24 Jun 2003 07:39:29 -0700
From: jennlee.2@eudoramail.com (Jennifer)
Subject: Can't locate @INC & not finding files in local directory
Message-Id: <e836199f.0306240639.240420b9@posting.google.com>
Hello -
I've got several Perl scripts that use custom perl modules which are
called from routines that are in the same directory as the scripts.
For example dir.pl in folder dir references dir_utilities.pl.
I call them with a require at the top of the routine, e.g. require
'dir_utilities.pl';
This worked fine for a number of years and this morning, all my
scripts are erroring with this type of message: Can't locate
dir_utilities.pl in @INC (@INC contains: sys:\perl\lib .) at dir.pl
line 16.
Our web administrator says they haven't made changes to our Perl
install or the web server itself (we are running Perl 5 on a Novell
web server) and I haven't made any routine changes.
It looks as though when Perl is executing the script it is not reading
the local directory as it used to and therefore is not finding the
files there. The files do exist and are unchanged.
I tried adding this to see if I can get it to have the directory
reference:
BEGIN {
push ( @INC, 'sys:\perl\web\dir' );
}
This does stop the error for the require calls, but when other files
in the directory are referenced in the script (HTML templates used for
output, etc) it gives an error that it cannot find these, so it's like
it can find nothing from the directory where the script is.
Does anyone have any suggestions?
------------------------------
Date: Tue, 24 Jun 2003 20:22:54 +0530
From: Thens <thens@nospam.com>
Subject: Re: Can't locate @INC & not finding files in local directory
Message-Id: <20030624202254.2743acf2.thens@nospam.com>
On 24 Jun 2003 07:39:29 -0700
jennlee.2@eudoramail.com (Jennifer) wrote:
>Hello -
>This does stop the error for the require calls, but when other files
>in the directory are referenced in the script (HTML templates used for
>output, etc) it gives an error that it cannot find these, so it's like
>it can find nothing from the directory where the script is.
>
>Does anyone have any suggestions?
Looks like the Current Working directory (CWD) has changed.
Regards,
Thens.
------------------------------
Date: Tue, 24 Jun 2003 14:36:58 +0200
From: Gunnar Hjalmarsson <mailbox@gunnar.cc>
Subject: Distributed CGI script in taint mode (re-post)
Message-Id: <bd9h19$qk5p2$1@ID-184292.news.dfncis.de>
(This question was previously sent at 14 and 18 June, but since nobody
has commented on it, I send it again. Third time lucky?)
I have just made the necessary tweaking of a CGI script to enable the
-T flag. To be able to run other programs, without knowing their
location, I'm currently doing the following:
$ENV{PATH} = securepath();
sub securepath {
my $sep = $^O eq 'MSWin32' ? ';' : ':';
my @paths = ();
for (split $sep, $ENV{PATH}) {
if (m!^((?:\w:)?[\w-./ \\~]*)$!) {
push @paths, $1;
} else {
die 'Insecure $ENV{PATH}';
}
}
return join $sep, @paths;
}
The above function doesn't change the contents of $ENV{PATH}, it just
untaints it. Even if I realize that I circumvent this aspect of the
taint check, I haven't found a better solution without having the
users state the directories of the programs in question in a config
file. (There are hundreds of users out there on various servers.)
Is there any other available option without causing that extra
inconvenience at installation? Any thoughts would be appreciated.
/ Gunnar
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Tue, 24 Jun 2003 12:58:37 GMT
From: helgi@decode.is (Helgi Briem)
Subject: Re: Distributed CGI script in taint mode (re-post)
Message-Id: <3ef8499d.99545171@news.cis.dfn.de>
On Tue, 24 Jun 2003 14:36:58 +0200, Gunnar Hjalmarsson
<mailbox@gunnar.cc> wrote:
>(This question was previously sent at 14 and 18 June, but since nobody
>has commented on it, I send it again. Third time lucky?)
>
>I have just made the necessary tweaking of a CGI script to enable the
>-T flag. To be able to run other programs, without knowing their
>location, I'm currently doing the following:
>
> $ENV{PATH} = securepath();
>
> sub securepath {
> my $sep = $^O eq 'MSWin32' ? ';' : ':';
> my @paths = ();
> for (split $sep, $ENV{PATH}) {
> if (m!^((?:\w:)?[\w-./ \\~]*)$!) {
> push @paths, $1;
> } else {
> die 'Insecure $ENV{PATH}';
> }
> }
> return join $sep, @paths;
> }
>
>The above function doesn't change the contents of $ENV{PATH}, it just
>untaints it.
Why go to all this trouble to circumvent a security measure?
Why not simply say something like:
if ($^O =~/win/i) {
$ENV{PATH} = 'C:\Perl\bin\;C:\WINNT\system32;C:\WINNT;'; }
else { $ENV{PATH} = '/usr/bin:/usr/sbin:/bin'; }
or, even better, call each external program with a full path.
------------------------------
Date: Tue, 24 Jun 2003 15:22:11 +0100
From: "Shotoku Taishi" <shotoku.taishi@virgin.net>
Subject: Help needed with Net::Telnet
Message-Id: <bd9ngn$t4g$1@news8.svr.pol.co.uk>
Hi
I would like to run commands remotely using net::telnet from CPAN.
I am trying to run the following:
#!/usr/bin/perl -w
use strict;
use Net::Telnet;
my $host= "Andromeda";
my $username = "Andro";
my $passwd = "stars";
$t = new Net::Telnet (Timeout => 10,
Prompt => '/c:\\\\users\\\\andro>$/i');
$t->open("$host");
$t->login($username, $passwd);
@lines = $t->cmd("ls");
print @lines;
I get the following error message:
Global symbol "$t" requires explicit package name
Thanks
Mike
------------------------------
Date: Tue, 24 Jun 2003 12:13:56 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: Issues grabbing UTF8 web page
Message-Id: <Pine.LNX.4.53.0306241133120.27155@lxplus064.cern.ch>
On Tue, Jun 24, Simon Fairey inscribed on the eternal scroll:
> Well I have use utf8 at the start, and there is no setting in LWP
But the HTTP protocol is _supposed_ to be telling the client what the
document encoding is - not expecting the client to guess!
> to
> tell it to grab a page in a specific coding as far as I can see.
OK, I'm a bit weak in that specific area myself too, so I won't say
anything that I might regret, which is why I was trying to provoke you
to produce a test case that any interested contributor could review
and add their own 2p.
> I think this may well be the case as I suspect that before I even get
> a look in some sort of conversion has been done.
This is why we need a concrete test case, especially as you're
evidently working from bogus reference material (there's a lot of it
about - I'm not blaming you for it!).
> Sorry think I'm going from old references I had lying around:
>
> http://www.bbsinc.com/symbol.html
This is one of the many bogus contributions that are out there, sorry.
These misguided souls write bogus numerical character references, view
them on their own favourite browser and platform, and assume (without
any reference to authoritative sources) that what they are seeing just
has to be what they were intended to see.
The MS Office folks, on first encountering HTML, seem to have done
just the same, which means that this abuse is now widespread. But the
authoritative HTML and XHTML specifications still say what they say,
irrespective of one dominant vendor trying to derail them.
The characters 127 to 159 decimal inclusive, in the Unicode/iso10646
coding, are reserved for control characters. Their use in numerical
character references in standard HTML is undefined, and in XML/XHTML
is illegal, no matter that (on some platforms and browsers) they
happen to exhibit the characters which the MS-proprietary Windows-1252
coding assigns to them. Each of those Windows-1252 characters has its
proper place in the Unicode coding, as can be found for example within
the HTML4.01 specification:
http://www.w3.org/TR/html401/sgml/entities.html#h-24.3 et seq.,
or in the registered mapping between Windows-1252 and Unicode at
http://www.unicode.org/Public/MAPPINGS/VENDORS/MICSFT/WINDOWS/CP1252.TXT
> > If your XML document is supposed to be coded in iso-8859-1, then your
> > only valid way to represent the bullet character is as its proper
> > numerical character reference, • or (quick reference to
> > read-reckoner...) •
>
> Do you have a link to such a reference,
Well, the "ready-reckoner" I referred to was just a set of pages that
I made for myself via a script that runs against the authoritative
Unicode database. All the official Unicode stuff is, obviously, at
http://www.unicode.org/ - my generated tables are below
http://ppewww.ph.gla.ac.uk/~flavell/unicode/
> I'm also concerned that there
> may be other characters that may come through and I'm wondering what
> the 'Done Thing' is with regards converting a UTF-8 encoded XML doc
> into an ISO-8859-1 XML doc.
There's XML-based software which does just that (but that isn't a Perl
topic). I'm not fully au fait with that area myself but you should be
looking for general XML resources and its usenet group, I guess.
But sure, you could also script this in Perl - should be no technical
problem.
> > As usual, a minimal script that we could run for ourselves and that
> > exhibited the symptoms that you're complaining of would short-cut a
> > panoply of possible misunderstandings
[..]
Seems I'm going to have to leave that request standing, for now...
good luck
------------------------------
Date: Tue, 24 Jun 2003 05:28:50 -0500
From: "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
Subject: Re: Resource for Perl Newbies
Message-Id: <Xns93A441E65B34Dsdn.comcast@206.127.4.25>
-----BEGIN xxx SIGNED MESSAGE-----
Hash: SHA1
"Anthony M. Saffer" <anthony@nospam.safferconsulting.com> wrote in
news:3ef76585_1@nntp2.nac.net:
> I just posted the complete hyperlinked "Teach yourself Perl in 21
> days" at my website. You can view it at
> http://www.safferconsulting.com/perl-tut
Out of curiosity, do you have the permission of the copyright holders to
post the text of their book on the web?
I perused the book a bit, and I am unimpressed. Within a minute, I had
found a factual error (it claims that logical comparison operators return
0 when the expression is false; in fact, they return ''). Also, in the
chapter on subroutines, they shamelessly encourage the use of "&foo;"
style of invoking subroutines -- this is bad practice.
In the chapter on object-oriented programming, the book instructs you to
use the Exporter module to export method names. Bad. Also, it tells you
to use this syntax:
@EXPORT(declareMain, closeMain);
What the hell is that?
In the section on substitution, the book incorrectly states that
s/abc/$var/o
will only evaluate $var once, and will substitute the original value of
$var even if $var subsequently changes. In fact, /o only applies to the
left hand side of the substitution.
This book is crap. I found these problems in ten minutes of browsing it.
- --
Eric
$_ = reverse sort qw p ekca lre Js reh ts
p, $/.r, map $_.$", qw e p h tona e; print
-----BEGIN xxx SIGNATURE-----
Version: PGPfreeware 7.0.3 for non-commercial use <http://www.pgp.com>
iQA/AwUBPvgn1mPeouIeTNHoEQL5xwCgsodmddhz4fLqs9MKitmvYAIME/QAnjdr
Bo9BXrpsdbrjO4kIJd7RgWAR
=2Osa
-----END PGP SIGNATURE-----
------------------------------
Date: Tue, 24 Jun 2003 07:47:02 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Resource for Perl Newbies
Message-Id: <slrnbfgi26.482.tadmc@magna.augustmail.com>
Anthony M. Saffer <anthony@nospam.safferconsulting.com> wrote:
> I just posted the complete hyperlinked "Teach yourself Perl in 21 days" at
> my website.
Copyright violation is a crime.
If you have permission from the publisher, you should probably
state that clearly on those pages to avoid giving your readers
the wrong impression.
If not, it is a bit strange to announce your crime in an archived
forum with a worldwide distribution...
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 24 Jun 2003 13:05:14 GMT
From: Alex Burger <aburger@rogers.com>
Subject: s/// substitution with capture / memory in a variable
Message-Id: <e0YJa.6936$H9q1.751@news04.bloor.is.net.cable.rogers.com>
Hi.
My program allows for a user to enter a s/// expression that will be
performed on a string. It appears to work fine except when a capture /
memory variable is used.
For example:
$string = 'one two three four five';
$left = 'two (\w+) four';
$string =~ s/$left/two **** $1 **** four/;
That works fine with the output being:
one two **** three **** four five
I am trying to get this to work:
$string = 'one two three four five';
$left = 'two (\w+) four';
$right = 'two **** $1 **** four' ;
$string =~ s/$left/$right/;
but it only prints out:
one two **** $1 **** four five
Is there a way to make $string =~ s/$left/$right/ interopolate the $1
inside of $right when executing the expression? $left and $right are
strings that are entered by the user inside of the program.
Thanks.
Alex
------------------------------
Date: Tue, 24 Jun 2003 14:57:32 -0000
From: "David K. Wall" <usenet@dwall.fastmail.fm>
Subject: Re: s/// substitution with capture / memory in a variable
Message-Id: <Xns93A46F7A4C157dkwwashere@216.168.3.30>
Alex Burger <aburger@rogers.com> wrote:
> I am trying to get this to work:
>
> $string = 'one two three four five';
> $left = 'two (\w+) four';
> $right = 'two **** $1 **** four' ;
The value of $1 does not yet contain what you wanted from the capturing
parentheses because the regular expression in $left has yet to be
evaluated. Also, you're using a single-quoted string, so no variable
interpolation takes place.
> $string =~ s/$left/$right/;
>
> but it only prints out:
> one two **** $1 **** four five
For your test case, this will work:
# always enable strict and warnings - let perl help you
use strict;
use warnings;
my $string = 'one two three four five';
my $left = 'two (\w+) four';
if ( $string =~ /$left/ ) {
my $right = "two **** $1 **** four"; # note: double quotes
$string =~ s/$left/$right/;
}
print $string;
This uses $left as a regex twice; offhand I can't think of a way
around that if you want to use $1. (There may be a way, it's just not
immediately obvious to *me*.)
------------------------------
Date: Tue, 24 Jun 2003 14:46:34 +0100
From: mike solomon <mike_solomon@lineone.net>
Subject: Re: soap::lite hellp needed with sms
Message-Id: <3EF8563A.10802@lineone.net>
Bryan Castillo wrote:
> mike solomon <mike_solomon@lineone.net> wrote in message news:<3EF70B29.3050106@lineone.net>...
>
>>I am trying to send sms messages using a SOAP interface
>>
>>I think the way to go is to use soap::lite
>>
>>I have had a look at the documentation and I must admit that I don't
>>understand what I need to do
>>
>>the XML example I have been given is as follows:
>>
>>POST /secure/messenger/soap/SendService.asmx HTTP/1.1
>>Host: www.esendex.com
>>Content-Type: text/xml; charset=utf-8
>>Content-Length: length
>>SOAPAction: "com.esendex.ems.soapinterface/SendMessageFull"
>>
SNIP
>
> I'm really don't know SOAP too well, but here is my shot at it.
>
> use strict;
> use warnings;
> use SOAP::Lite;
>
> # change the host to the correct one!
> my $host = 'www.esendex.com';
> #my $host = 'localhost:6060';
>
> my $proxy = "http://$host/secure/messenger/soap/SendService.asmx";
> my $uri = "http://$host/com.esendex.ems.soapinterface";
>
> #The name of the module
> my $soap = SOAP::Lite->uri($uri);
> print "soap = $soap\n";
>
> #The url for the request
> $soap = $soap->proxy($proxy);
> print "soap = $soap\n";
>
> # send the request w/ header
> my $response = $soap->SendMessageFull(
>
> # HEADER
> SOAP::Header->name(Username => 'bryan'),
> SOAP::Header->name(Password => 'monkeyman'),
> SOAP::Header->name(Account => '0099'),
>
> # PARAMETERS FOR BODY
> SOAP::Data->name(originator => 'Bank One'),
> SOAP::Data->name(recipient => 'me'),
> SOAP::Data->name(body => 'give me the dough'),
> SOAP::Data->name(type => 'USD'),
> SOAP::Data->name(validityperiod => 99)
>
> );
>
> print "response = $response\n";
>
> # get the result and print the error message if it failed
> if (defined (my $result = $response->result)) {
> print "result = $result\n";
> }
> else {
> print "Fault: ", $response->faultstring, "\n",
> "Detail:\n", $response->faultdetail, "\n";
> }
>
>
>
>
SNIP
> Fault: System.Web.Services.Protocols.SoapException: Server did not
> recognize the value of HTTP Header SOAPAction:
> com.esendex.ems.soapinterface#SendMessageFull.
> at System.Web.Services.Protocols.Soap11ServerProtocolHelper.RouteRequest()
> at System.Web.Services.Protocols.SoapServerProtocol.Initialize()
> at System.Web.Services.Protocols.ServerProtocolFactory.Create(Type
> type, HttpContext context, HttpRequest request, HttpResponse response,
> Boolean&abortProcessing)
> Detail:
>
>
> You should see that the SOAPAction is different between what I
> generated and the xml you posted. I tried removing the http and
> hostname from the uri method, however I still received the same error.
> I don't know why the xml you showed had a '/' while mine had a '#',
> but then again I don't really know SOAP.
>
> I hope this gets you going in the right direction though.
>
> I would also ask the company, if they had example client code in other
> languages.
>
>
Bryan
Thanks for your help with this
I tried your code and I am getting the same error message
soap::lite appears to be generating # not / which apears to be what
their server is complaining about
I have contacted the company concerned and they are going to try and
trace what is being received at their end
If anyone knows if there is a way to produce a / rather than a # I will
be really grateful
------------------------------
Date: 24 Jun 2003 13:02:00 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: unicode in Image::Magick (hex values and braces problem?)
Message-Id: <bd9i48$fjj$1@mamenchi.zrz.TU-Berlin.DE>
Eric Schwartz <emschwar@pobox.com> wrote in comp.lang.perl.misc:
> "Janek Schleicher" <bigj@kamelfreund.de> writes:
> > Bert Balcaen wrote at Mon, 23 Jun 2003 21:28:16 +0000:
> > > my $text="";
> > > for(my $uni=25000;$uni<25100;$uni++) {
> > > $text .= chr(hex($uni));
> > > $uni ++;
> > > }
> >
> > That seems only to be a long version of
> >
> > my $text = join "" map chr, (0 .. 25_000);
>
> You appear to have misspelled
>
> my $text = join "", map chr, (25000 .. 25099);
>
> (Note comma after join's 1st arg, and correct indices.)
To mimic the OP's code perfectly it should only use every other character.
Note that $uni is incremented once in the loop control and once in the
loop body.
Anno
------------------------------
Date: Tue, 24 Jun 2003 15:46:54 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: unicode in Image::Magick (hex values and braces problem?)
Message-Id: <Pine.LNX.4.53.0306241536080.27155@lxplus064.cern.ch>
On Tue, Jun 24, Anno Siegel inscribed on the eternal scroll:
> > > > my $text="";
> > > > for(my $uni=25000;$uni<25100;$uni++) {
> > > > $text .= chr(hex($uni));
> > > > $uni ++;
> > > > }
> To mimic the OP's code perfectly it should only use every other character.
> Note that $uni is incremented once in the loop control and once in the
> loop body.
Gosh, so it does. I'm beginning to feel quite sorry for the original
poster ;-) There's hardly a piece of the original coding that hasn't
got torn to shreds by one or other of us.
But this is an effective way to learn, even if it can prove
embarrassing for the victim!
Speaking for myself (by training a physicist, and therefore reputed to
"code FORTRAN in any language"), I have to admit to frequently
overlooking the "map" construct in favour of coding a loop.
But at least I've learned to write that kind of loop in a more
Perl-ish way (i.e per Tad's posting on this thread) than to mimic the
C paradigm. Ho hum.
------------------------------
Date: Tue, 24 Jun 2003 08:17:56 -0500
From: Yarden Katz <katz@underlevel.net>
To: James McIninch <james.mcininch@attbi.com>
Subject: Re: using SOAP::Lite to call other services.
Message-Id: <86ptl3obqz.fsf@underlevel.net>
James McIninch <james.mcininch@attbi.com> writes:
> A few things: I'd suggest that you use the +trace option to SOAP::Lite to
> see what's going on under the covers -- It's very informative. Next, you
> are calling a Microsoft .Net service (.asmx), meaning that it's probably
> not strictly SOAP compliant. The SOAP::Lite documentation give pointers on
> how to compensate for the pecualiarities of the bugs in .Net. Finally, if
> you specify the service() to SOAP::Lite, you should leave off the proxy()
> and the uri() since the service() is supposed to set those things for you.
A couple of things: I've been using +trace from the start (that's how
I knew what message my client was sending) and it is indeed very
useful. I've tried the combination you suggested (removing
uri()/proxy() and just using service()) but I get the same results.
Additionally, for another .asmx service I was attempting to call,
removing proxy() and just pointing service to the WSDL file was not an
option. When I did that, I'd get the error: Transport not specified
(use proxy() or service method)
--
Yarden Katz <katz@underlevel.net> | Mind the gap
------------------------------
Date: Tue, 24 Jun 2003 10:49:09 GMT
From: helgi@decode.is (Helgi Briem)
Subject: Re: V Newbie: Installing Perl modules
Message-Id: <3ef82c1f.91994937@news.cis.dfn.de>
On Tue, 24 Jun 2003 09:38:58 +0100, "des fisher"
<desfisher@NaTCH.co.uk> wrote:
>I'm a v newbie who is trying to run the checklink thingy
>(http://validator.w3.org/checklink)
>
>I've installed ActivePerl and example.pl ran ok. I'm trying to install the
>Perl modules needed by checklink.
>
>PPM starts up fine and I've downloaded to my root directory cgi.pm.txt.
Why did you do that'
>In PPM the command "install c:\cgi.pm.txt" gets the message "Searching for
>'c:\cgi.pm.txt' returns no results. Try a broader search first."
Of course. Why should PPM try to install a text file?
Plus, Activeperl comes with the CGI module as standard.
You don't need to install anything extra.
>Don't understand. Help.
>I tried renaming cgi.pm.txt as cgi.pm and same result.
That's not surprising.
------------------------------
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.
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 5130
***************************************
