[28535] in Perl-Users-Digest
Perl-Users Digest, Issue: 9899 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Oct 27 18:05:51 2006
Date: Fri, 27 Oct 2006 15:05:10 -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 Fri, 27 Oct 2006 Volume: 10 Number: 9899
Today's topics:
Re: activestate perl via shell() on XP, module location <brian.helterline@hp.com>
Re: Encoding problem: Rsquo to a with a hat <afrinspray@gmail.com>
Re: Encoding problem: Rsquo to a with a hat <trwww@sbcglobal.net>
Re: FAQ 4.29 How can I count the number of occurrences <brian.d.foy@gmail.com>
Re: FAQ 4.29 How can I count the number of occurrences <tadmc@augustmail.com>
file convesrions <shashichinnakar@gmail.com>
file convesrions <shashichinnakar@gmail.com>
Re: file convesrions <glex_no-spam@qwest-spam-no.invalid>
Re: file convesrions <benmorrow@tiscali.co.uk>
Re: file convesrions <tadmc@augustmail.com>
Re: file convesrions <tadmc@augustmail.com>
Net::Telnet, wrong prompt, user not needed only passwor <georg.heiss@gmx.de>
Net::Telnet, wrong prompt, user not needed only passwor <georg.heiss@gmx.de>
Re: Net::Telnet, wrong prompt, user not needed only pas <glex_no-spam@qwest-spam-no.invalid>
Re: Net::Telnet, wrong prompt, user not needed only pas <DJStunks@gmail.com>
Re: Net::Telnet, wrong prompt, user not needed only pas <georg.heiss@gmx.de>
Re: Net::Telnet, wrong prompt, user not needed only pas <georg.heiss@gmx.de>
perl program for clusters <usaims@yahoo.com>
Re: Reducing file length in Perl? <nospam@thanksanyway.org>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 27 Oct 2006 19:47:10 GMT
From: Brian Helterline <brian.helterline@hp.com>
Subject: Re: activestate perl via shell() on XP, module location problem
Message-Id: <2nt0h.1699$QZ4.647@news.cpqcorp.net>
doolittle wrote:
> Thanks for the suggestion, i think i understand (a bit of) whats going
> on:
>
> The shell("mymodscript.pl") command runs in
>
> C:/Documents and Settings/ibm/My Documents
>
> this 'works' somehow although mymodscript.pl isn't in this directory,
> its in
>
> C:/Documents and Settings/ibm/My Documents/perl
>
> which is where the modules are, which is why perl can't find them.
>
> So i could put the module in C:/Perl/site/lib, or alter @INC to include
>
> C:/Documents and Settings/ibm/My Documents/perl
>
Another method to use for modules you don't have in @INC is:
# yoursript.pl
use FindBin;
use lib $FindBin::Bin; # adds location of script to @INC
use yourmodule;
This method requires yourmodule.pm be in the same directory as
yourscript.pl
--
brian
------------------------------
Date: 27 Oct 2006 11:16:26 -0700
From: "afrinspray" <afrinspray@gmail.com>
Subject: Re: Encoding problem: Rsquo to a with a hat
Message-Id: <1161972986.379979.87220@h48g2000cwc.googlegroups.com>
Ok after some research I think I can better narrow down the problem I'm
having. The module XML::Filter::SAX1toSAX2 is converting my html
entities ( ’ etc...) to weird characters.
I changed the XML::SAX::Machines Pipeline in my code from this:
my $machine = Pipeline(
'XML::Filter::SAX1toSAX2' =>
'XML::Filter::BufferText' =>
'XML::Filter::HtmlTagStripper' =>
$writer
);
to
my $machine = Pipeline(
'XML::Filter::SAX1toSAX2' =>
\*STDOUT
);
and it's converting the entities to gibberish. Is there another
SAX1toSAX2 like module out there? Can anyone thing of a replacement?
If i remove the SAX1toSAX2 call from the Pipeline, there's no output.
Also, on a side note I previous decoded the input using
MIME::Decoder...
Any help would be greatly appreciated.
Mike
afrinspray wrote:
> Sorry that was Todd W.:
> http://groups-beta.google.com/group/comp.lang.perl.misc/browse_thread/thread/a1d24b4eec251e80/
>
> Anyway, does anyone have any ideas how I can get it to stop convert & n
> b s p ; and other standard HTML entities to gibberish?
>
>
> Mike
------------------------------
Date: Fri, 27 Oct 2006 20:14:06 GMT
From: "Todd W" <trwww@sbcglobal.net>
Subject: Re: Encoding problem: Rsquo to a with a hat
Message-Id: <iMt0h.16602$GR.7460@newssvr29.news.prodigy.net>
"afrinspray" <afrinspray@gmail.com> wrote in message
news:1161972986.379979.87220@h48g2000cwc.googlegroups.com...
Hi afrinspray, Im Todd W, the author of node 554219.
I glossed over (i.e. ignored) some things you have to keep in mind when
using XML processors.
>> Anyway, does anyone have any ideas how I can get it to stop convert & n
>> b s p ; and other standard HTML entities to gibberish?
> Ok after some research I think I can better narrow down the problem I'm
> having. The module XML::Filter::SAX1toSAX2 is converting my html
> entities ( ’ etc...) to weird characters.
Well once you know whats going on you cant really call the output jibberish,
as it is by design. Basically you are having an encoding issue. The
following rambling is my attempt to explain well enough for you to come up
with a solution.
Theres a few things going on here, so I need to break this up.
First, to explain how it is possible that you do not see ’ in your
output even though it is in your input.
Lets take a look at a more familiar feature of XML.
The XML illustrated here:
<tag attribute="value" />
is, to an xml parser, identical to the following snippet:
<tag attribute="value"></tag>
Also, this piece of XML:
<tag attribute="value">text</tag>
Is identical to this one:
<tag attribute='value'>text</tag>
To repeat: An xml parser (like your browser, or libxml2), dosent store
information about the document at that level. It dosent care if attribute
values are surrounded with single quotes or double quotes, or the tag ends
with a / then a >, or with a closing </tag>. SGML says the parser must
interpret the markup identically.
The situation is the same with your issue, character entity references. A
parser must expand the entity reference, and is not allowed to differentiate
between an entity reference (i.e. &XXXX;) and the entity itself.
Thats why it is even possible in the first place for the entity reference to
not appear in the output document even though it is in the input document.
So to answer your question, "Can I pass the entity reference through
unexpanded?", the answer is no. Of course you could do something like dig in
the code and find the part that expands entity references and have it change
the reference to text, but youd be hacking the parser, making it do
something its not supposed to do.
The next issue, the reason it appears as "jibberish" and not the expanded
entity, is:
1: you are not exporting the data from perl as UTF8
and/or
2: your document reader is either not configured to or capable of rendering
UTF8.
Now, as to what to do from here. Thats even harder to explain than the (far
from thorough) explination I gave above. I'll proceed by grabbing the code
and data from that node, making some modifications, and describing my
observations. The first thing I do is grab the data file from the node and
change it to:
<html>
<head>
<title>Test Document</title>
</head>
<body>
<p>The first paragraph</p>
<p>the second paragraph</p>
<hr width="75%">
<div>last ’ modified: WHENEVER</div>
</body>
</html>
I run the program on it, and indeed I get jibberish:
C:\download\misc>strip.pl striptags.html
Wide character in print at C:\download\misc\strip.pl line 28.
Test Document<p>The first ?á paragraph</p><p>the second
paragraph</p><div>last ?ÇÖ modified: WHENEVER</div>
Along with the "jibberish" I see a warning, "Wide character in print". This
tells me I need to change the output layer encoding to UTF8 (because I know
the data is stored in perl as UTF8).
So right before the
print $output;
in the program I add
binmode STDOUT, ":utf8";
C:\download\misc>strip.pl striptags.html
Test Document<p>The first ?á paragraph</p><p>the second
paragraph</p><div>last ?ÇÖ modified: WHENEVER</div>
No more warning, but still "jibberish". Makes sense actually: my console
dosent know how to render UTF8. But, IE has UTF8 aware parser. So I run:
C:\download\misc>strip.pl striptags.html > striptags.out.html
C:\download\misc>iexplore striptags.out.html
Okay, it displays properly in the browser. I can see the non breaking space,
and I can see the right single quote. I'm suprised, acutually. I would have
thought I needed to add a:
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
Can Firefox do it right automatically? Nope:
C:\download\misc>"c:\program files\mozilla firefox\firefox.exe"
striptags.out.html
shows the "jibberish". But, if I add the meta tag above to the beginning of
the file it renders properly.
Thanks for posting it was nice to get this written down.
Todd W.
------------------------------
Date: Fri, 27 Oct 2006 15:41:50 -0500
From: brian d foy <brian.d.foy@gmail.com>
Subject: Re: FAQ 4.29 How can I count the number of occurrences of a substring within a string?
Message-Id: <271020061541508110%brian.d.foy@gmail.com>
In article <1161955782.576895.233190@h48g2000cwc.googlegroups.com>,
werwer <drubnone@yahoo.com> wrote:
> > 4.29: How can I count the number of occurrences of a substring within a
> > string?
> $count = split(/this/, $s);
split() in scalar context is deprecated because of its side effects.
See perlfunc.
--
Posted via a free Usenet account from http://www.teranews.com
------------------------------
Date: Fri, 27 Oct 2006 15:34:09 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: FAQ 4.29 How can I count the number of occurrences of a substring within a string?
Message-Id: <slrnek4ra1.o20.tadmc@tadmc30.august.net>
[ text rearranged into a sensible order ]
werwer <drubnone@yahoo.com> wrote:
>> 4.29: How can I count the number of occurrences of a substring within a string?
> $count = split(/this/, $s);
Code that gives the wrong answer is not very useful...
----------------------------
#!/usr/bin/perl
use warnings;
use strict;
my $s = "this string has this in it this many times: 3\n";
my $count = split(/this/, $s);
print "$count\n";
$s = "a telepathist would say there is one in this string\n";
$count = split(/this/, $s);
print "$count\n";
----------------------------
$ test.pl
Use of implicit split to @_ is deprecated at ./test.pl line 6.
Use of implicit split to @_ is deprecated at ./test.pl line 10.
4
3
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 27 Oct 2006 12:37:47 -0700
From: "Jack" <shashichinnakar@gmail.com>
Subject: file convesrions
Message-Id: <1161976550.319064.308230@i42g2000cwa.googlegroups.com>
Hello all
I have a question!!
there is a file with extension dat (ie *.dat) in my
unix environment and i wanted to change this to .xls format i mean i
have to transfer this file to an excel sheet and then i need to send
this file as an attachment to an email address and all this should be
done in perl....please reply me soon
regards,
jack
------------------------------
Date: 27 Oct 2006 14:38:42 -0700
From: "Jack" <shashichinnakar@gmail.com>
Subject: file convesrions
Message-Id: <1161976175.500601.21800@e3g2000cwe.googlegroups.com>
Hello all
I have a question!!
there is a file with extension dat (ie *.dat) in my
unix environment and i wanted to change this to .xls format i mean i
have to transfer this file to an excel sheet and then i need to send
this file as an attachment to an email address and all this should be
done in perl....please reply me soon
regards,
jack
------------------------------
Date: Fri, 27 Oct 2006 14:55:11 -0500
From: "J. Gleixner" <glex_no-spam@qwest-spam-no.invalid>
Subject: Re: file convesrions
Message-Id: <454263f3$0$505$815e3792@news.qwest.net>
Jack wrote:
> Hello all
>
> I have a question!!
I have an answer.
> there is a file with extension dat (ie *.dat) in my
> unix environment and i wanted to change this to .xls format i mean i
> have to transfer this file to an excel sheet
You have to convert some file to an Excel spread sheet?
Open the file, parse what you want out of it, then write it using
Spreadsheet::WriteExcel.
http://search.cpan.org/~jmcnamara/Spreadsheet-WriteExcel-2.17/lib/Spreadsheet/WriteExcel.pm
> and then i need to send
> this file as an attachment to an email address
There are a lot of modules on CPAN to mail attachments. Give it a try:
http://search.cpan.org
> and all this should be done in perl....
Hence the post to comp.lang.perl.misc. Why not write it in a language
you know?
>please reply me soon
No thanks, I'll just post a response when I feel like it. :-)
------------------------------
Date: Fri, 27 Oct 2006 20:57:50 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: file convesrions
Message-Id: <uu4a14-bee.ln1@osiris.mauzo.dyndns.org>
Quoth "Jack" <shashichinnakar@gmail.com>:
> there is a file with extension dat (ie *.dat)
What the file's extension is is irrelevant. What matters is the format
of the data inside the file. .dat is commonly used for many different
file formats. If you can tell us what the format is, we may be able to
help you read it in Perl.
> in my
> unix environment and i wanted to change this to .xls format i mean i
> have to transfer this file to an excel sheet
When you want to do something complicated in Perl, first try looking at
http://search.cpan.org . Searching for 'excel' gives, on the first page
of results, the modules Spreadsheet::WriteExcel, for creating Excel
spreadsheets on any machine.
> and then i need to send
> this file as an attachment to an email address and all this should be
> done in perl
I would use the MIME::Lite module for this, though there are other
options.
> ....please reply me soon
Additions like this are considered rude here, as is writing without
capital letters or punctuation.
Ben
--
I've seen things you people wouldn't believe: attack ships on fire off
the shoulder of Orion; I watched C-beams glitter in the dark near the
Tannhauser Gate. All these moments will be lost, in time, like tears in rain.
Time to die. benmorrow@tiscali.co.uk
------------------------------
Date: Fri, 27 Oct 2006 15:20:20 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: file convesrions
Message-Id: <slrnek4qg4.o20.tadmc@tadmc30.august.net>
Jack <shashichinnakar@gmail.com> wrote:
> please reply me soon
Hi. How ya doin?
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Fri, 27 Oct 2006 15:21:22 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: file convesrions
Message-Id: <slrnek4qi2.o20.tadmc@tadmc30.august.net>
Jack <shashichinnakar@gmail.com> wrote:
> there is a file with extension dat (ie *.dat) in my
> unix environment and i wanted to change this to .xls format i mean i
> have to transfer this file to an excel sheet and then i need to send
> this file as an attachment to an email address and all this should be
> done in perl.
Did you mean to ask a question?
What part are you stuck on?
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 27 Oct 2006 11:51:59 -0700
From: "georg.heiss@gmx.de" <georg.heiss@gmx.de>
Subject: Net::Telnet, wrong prompt, user not needed only password is requested
Message-Id: <1161975118.820487.210550@i42g2000cwa.googlegroups.com>
Hi,
with:
$ netcat 192.168.1.254 23
i get this prompt:
??????!????Fritz!Box web password:
and after typing the password and
# ls
the telnet session works fine.
but with perl:
my $telnet =3D new Net::Telnet (Timeout =3D> 55, Prompt =3D> '/# /');
$telnet->open('192.168.1.254');
$telnet->login('root', 'passwd'); # user not needed only password is
requested
my @lines =3D $telnet->cmd("ls");
i get a timeout. Any Idea???
thanks
georg
------------------------------
Date: 27 Oct 2006 11:52:26 -0700
From: "georg.heiss@gmx.de" <georg.heiss@gmx.de>
Subject: Net::Telnet, wrong prompt, user not needed only password is requested
Message-Id: <1161975146.881847.314710@b28g2000cwb.googlegroups.com>
Hi,
with:
$ netcat 192.168.1.254 23
i get this prompt:
??????!????Fritz!Box web password:
and after typing the password and
# ls
the telnet session works fine.
but with perl:
my $telnet =3D new Net::Telnet (Timeout =3D> 55, Prompt =3D> '/# /');
$telnet->open('192.168.1.254');
$telnet->login('root', 'passwd'); # user not needed only password is
requested
my @lines =3D $telnet->cmd("ls");
i get a timeout. Any Idea???
thanks
georg
------------------------------
Date: Fri, 27 Oct 2006 14:43:21 -0500
From: "J. Gleixner" <glex_no-spam@qwest-spam-no.invalid>
Subject: Re: Net::Telnet, wrong prompt, user not needed only password is requested
Message-Id: <4542612e$0$10301$815e3792@news.qwest.net>
georg.heiss@gmx.de wrote:
> $ netcat 192.168.1.254 23
> i get this prompt:
> ??????!????Fritz!Box web password:
> and after typing the password and
> # ls
> the telnet session works fine.
>
> but with perl:
> my $telnet = new Net::Telnet (Timeout => 55, Prompt => '/# /');
> $telnet->open('192.168.1.254');
> $telnet->login('root', 'passwd'); # user not needed only password is
> requested
> my @lines = $telnet->cmd("ls");
>
> i get a timeout. Any Idea???
Start with the documentation for Net::Telnet
perldoc Net::Telnet
From the documentation:
login - perform standard login
This method performs a standard login by waiting for a login prompt
[...]If any of those prompts sent by the remote
side don't match what's expected, this method will time-out, unless
timeout is turned off.
[...]
Use "dump_log()" to debug when this method keeps timing-out and you
don't think it should.
Maybe waitfor() will help.
------------------------------
Date: 27 Oct 2006 12:37:59 -0700
From: "DJ Stunks" <DJStunks@gmail.com>
Subject: Re: Net::Telnet, wrong prompt, user not needed only password is requested
Message-Id: <1161977879.789159.17550@k70g2000cwa.googlegroups.com>
georg.heiss@gmx.de wrote:
> Hi,
> with:
> $ netcat 192.168.1.254 23
> i get this prompt:
> ??????!????Fritz!Box web password:
> and after typing the password and
> # ls
> the telnet session works fine.
>
> but with perl:
> my $telnet =3D new Net::Telnet (Timeout =3D> 55, Prompt =3D> '/# /');
> $telnet->open('192.168.1.254');
> $telnet->login('root', 'passwd'); # user not needed only password is
> requested
> my @lines =3D $telnet->cmd("ls");
>
> i get a timeout. Any Idea???
yes, I have some ideas. gather round kids while I read some
documentation!
It was a dark and stormy night and Net::Telnet said:
[The login()] method performs a standard login by waiting for a
login prompt and responding with *$username*, then waiting for
the password prompt and responding with *$password*, and then
waiting for the command interpreter prompt. If any of those
prompts sent by the remote side don't match what's expected,
this method will time-out, unless timeout is turned off.
Login prompt must match either of these case insensitive
patterns:
/login[: ]*$/i
/username[: ]*$/i
Password prompt must match this case insensitive pattern:
/password[: ]*$/i
Yes, Perl tries to DWIM, but come on...
I suggest you RTFM before asking the follow-up question "ok, so how
do I send my password to _my_ box?"
-jp
------------------------------
Date: 27 Oct 2006 12:59:44 -0700
From: "georg.heiss@gmx.de" <georg.heiss@gmx.de>
Subject: Re: Net::Telnet, wrong prompt, user not needed only password is requested
Message-Id: <1161979184.082130.96460@k70g2000cwa.googlegroups.com>
oh i am so ...first read the documentation is a really good idea,
thanks a lot for your fast help!!!
georg
J=2E Gleixner schrieb:
> georg.heiss@gmx.de wrote:
>
> > $ netcat 192.168.1.254 23
> > i get this prompt:
> > ??????!????Fritz!Box web password:
> > and after typing the password and
> > # ls
> > the telnet session works fine.
> >
> > but with perl:
> > my $telnet =3D new Net::Telnet (Timeout =3D> 55, Prompt =3D> '/# /');
> > $telnet->open('192.168.1.254');
> > $telnet->login('root', 'passwd'); # user not needed only password is
> > requested
> > my @lines =3D $telnet->cmd("ls");
> >
> > i get a timeout. Any Idea???
>
> Start with the documentation for Net::Telnet
>
> perldoc Net::Telnet
>
> From the documentation:
>
> login - perform standard login
> This method performs a standard login by waiting for a login prompt
> [...]If any of those prompts sent by the remote
> side don't match what's expected, this method will time-out, unless
> timeout is turned off.
> [...]
> Use "dump_log()" to debug when this method keeps timing-out and you
> don't think it should.
>=20
> Maybe waitfor() will help.
------------------------------
Date: 27 Oct 2006 13:01:04 -0700
From: "georg.heiss@gmx.de" <georg.heiss@gmx.de>
Subject: Re: Net::Telnet, wrong prompt, user not needed only password is requested
Message-Id: <1161979264.830134.218210@e3g2000cwe.googlegroups.com>
oh i am so ...first read the documentation is a really good idea,
thanks a lot for your fast help!!!
georg
J=2E Gleixner schrieb:
> georg.heiss@gmx.de wrote:
>
> > $ netcat 192.168.1.254 23
> > i get this prompt:
> > ??????!????Fritz!Box web password:
> > and after typing the password and
> > # ls
> > the telnet session works fine.
> >
> > but with perl:
> > my $telnet =3D new Net::Telnet (Timeout =3D> 55, Prompt =3D> '/# /');
> > $telnet->open('192.168.1.254');
> > $telnet->login('root', 'passwd'); # user not needed only password is
> > requested
> > my @lines =3D $telnet->cmd("ls");
> >
> > i get a timeout. Any Idea???
>
> Start with the documentation for Net::Telnet
>
> perldoc Net::Telnet
>
> From the documentation:
>
> login - perform standard login
> This method performs a standard login by waiting for a login prompt
> [...]If any of those prompts sent by the remote
> side don't match what's expected, this method will time-out, unless
> timeout is turned off.
> [...]
> Use "dump_log()" to debug when this method keeps timing-out and you
> don't think it should.
>=20
> Maybe waitfor() will help.
------------------------------
Date: 27 Oct 2006 13:59:11 -0700
From: "usaims" <usaims@yahoo.com>
Subject: perl program for clusters
Message-Id: <1161982751.699851.305190@h48g2000cwc.googlegroups.com>
Hello:
I'm in the process of writing a program that I can put on an apache
server which tells me which clusters are in or out of a load balancer.
I deal with 3 clusters all day long, which at all times, 2 clusters are
in the load balancer. I would like my boss to go to a web page and see
green for two clusters and a red for the one that is out. But I would
like to put this in a timetable graph so that they can see which
clusters were in at a certain time. Can somebody give some 'keywords'
to look for in google because I really don't have a clue on where to
start. My Perl skills are adequate but a little push in the right
direction will be greatly appreciated.
usaims
------------------------------
Date: Fri, 27 Oct 2006 11:35:53 -0700
From: "Mark" <nospam@thanksanyway.org>
Subject: Re: Reducing file length in Perl?
Message-Id: <1161974153.873264@bubbleator.drizzle.com>
<usenet@DavidFilmer.com> wrote:
> Mark wrote:
>> I am processing a large text file, and I need to eliminate all data after
>> a
>> certain point in the file.
>
> perldoc -f truncate
Dammit, I swear I looked that up in my Perl book.
It's there now, of course. I suppose the gnomes
snuck the page back in while I was posting my
question.
Thanks
-Mark
------------------------------
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 9899
***************************************