[28399] in Perl-Users-Digest
Perl-Users Digest, Issue: 9763 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Sep 25 14:06:03 2006
Date: Mon, 25 Sep 2006 11: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 Mon, 25 Sep 2006 Volume: 10 Number: 9763
Today's topics:
CPAN conflict issue - CGI.pm vs ModPerl::Registry <gabriel.larkin@gmail.com>
Re: differences between hashes and arrays ? <josef.moellers@fujitsu-siemens.com>
Re: Federated CGI to CGI <matt.toy@gmail.com>
Re: Federated CGI to CGI anno4000@radom.zrz.tu-berlin.de
Re: Federated CGI to CGI <glex_no-spam@qwest-spam-no.invalid>
Re: Net::Telnet, script exits after connection failure <ArcadyG@gmail.com>
Spreadsheet::WriteExcel & worksheet->write courtney.machi@gmail.com
Re: Spreadsheet::WriteExcel & worksheet->write <David.Squire@no.spam.from.here.au>
Re: Spreadsheet::WriteExcel & worksheet->write <mritty@gmail.com>
Tk- getOpenFile sticks on W2K server <lev.weissman@creo.com>
Re: Tk- getOpenFile sticks on W2K server <zentara@highstream.net>
Re: Tk- getOpenFile sticks on W2K server <lev.weissman@creo.com>
Re: Tk-perl2exe FileSelect error <sisyphus1@nomail.afraid.org>
Re: Tk-perl2exe FileSelect error <lev.weissman@creo.com>
Re: Tk-perl2exe FileSelect error <sisyphus1@nomail.afraid.org>
Re: Tk-perl2exe FileSelect error <lev.weissman@creo.com>
windows problem with socket write <polka.hanky@virgin.net>
Re: windows problem with socket write <sisyphus1@nomail.afraid.org>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 25 Sep 2006 09:42:27 -0700
From: "Gabriel" <gabriel.larkin@gmail.com>
Subject: CPAN conflict issue - CGI.pm vs ModPerl::Registry
Message-Id: <1159202547.124772.126950@i42g2000cwa.googlegroups.com>
Recently, I installed ModPerl::Registry on a Fedora Core Server, as
regular ModPerl didn't want to install, due to some janky Fedora Core
reason.
I wrote some CGI scripts, and all was well. Peace reigned, and my perl
scripts ran happily in the meadows, alongside unicorns and fairies.
Then, one day, for some foolish reason, I went to install CGI.pm on a
friday evening. The install went well, and I went home.
On monday morning, when I went to run some CGI scripts, they had
broken! (oh noes!)
A close inspection (or a `tail -1 /var/log/httpd/error_log` , actually)
revealed the following...
<ERROR_LOG>
Can't locate Apache.pm in @INC (@INC contains: ...
</TRUNCATED ERROR_LOG>
Now, I have no idea why installing CGI.pm has broken my scripts. Is
there a way of uninstalling a module, and, more importantly, would that
be likely to fix it?
My first thought upon looking at the error_log error, was to install
Apache.pm, but that only results in the following error during 'make
test'...
<ERROR>
/httpd -f `pwd`/t/conf/httpd.conf -X -d `pwd`/t &
/bin/sh: /httpd: No such file or directory
httpd listening on port 8529
will write error_log to: t/logs/error_log
letting apache warm up...\c
done
/usr/bin/perl t/TEST 0
still waiting for server to warm up...............not ok
server failed to start! (please examine t/logs/error_log) at t/TEST
line 95.
make: *** [run_tests] Error 111
/usr/bin/make test -- NOT OK
Running make install
make test had returned bad status, won't install without force
</ERROR>
Is 'httpd' a utility I need to install in order to install Apache.pm?
Aside from CPAN, and Apache.pm failing to install (probably due to some
FC oddity), what I don't understand is how installing CGI.pm managed to
break my existing install which was using ModPerl::Registry. I mean, I
didn't change any of my code, nor did I change my httpd.conf file...
<HTTPD.CONF>
PerlModule ModPerl::Registry
<Directory "/home/media/mod_perl/">
SetHandler perl-script
PerlResponseHandler ModPerl::Registry
PerlOptions +ParseHeaders
#PerlOptions -GlobalRequest
Options +ExecCGI +Indexes
</Directory>
</HTTPD.CONF>
The only thing I can think of is CGI.pm (3.23) broke something with the
ModPerl::Registry working...
So, is there a way of uninstalling a module, and, if so, would that be
likely to repair my problem?
------------------------------
Date: Mon, 25 Sep 2006 13:41:24 +0200
From: Josef Moellers <josef.moellers@fujitsu-siemens.com>
Subject: Re: differences between hashes and arrays ?
Message-Id: <ef8ffj$o4j$1@nntp.fujitsu-siemens.com>
J=FCrgen Exner wrote:
> Mirco Wahab wrote:
>=20
>>An "array" means otherwise "access by an index number",
>>so array elements must be searched in order to
>>find a particular item.
>=20
>=20
> Not really. To access the 23rd element of an array in a typical=20
> implementation you would simply access
> StartOfArray + 23 * SizeOfArrayElement
> which is just adding a constant that is independant of the size of the =
> array. No need to search (which would be O(n log n)).
How then do you know it's item #23?
--=20
Josef M=F6llers (Pinguinpfleger bei FSC)
If failure had no penalty success would not be a prize
-- T. Pratchett
------------------------------
Date: 25 Sep 2006 03:32:01 -0700
From: "beowoof" <matt.toy@gmail.com>
Subject: Re: Federated CGI to CGI
Message-Id: <1159180321.647890.71300@m7g2000cwm.googlegroups.com>
beowoof wrote:
> > Please bottom-post in this newsgroup. Here is a link to the posting
> > guidelines for this ng: http://www.augustmail.com/~tadmc/clpmisc.shtml
> >
> > You can use the WWW::Mechanize module to allow a perl script to interact
> > with web pages as a browser would, or you can use WWw::Curl::easy to
> > post a form, or you can use LWP, or you can use create the POST request
> > using HTTP::Request and send it using Net::HTTP, or you can use the
> > "curl" external program to post the form, or you can use the "lynx"
> > external program to post, or you can use the "wget" external program, or ...
> >
> >
> >
> > --
> > paduille.4058.mumia.w@earthlink.net
>
> Very interesting... Not too sure about using external programs, but
> you have given me some good ideas to work with.
>
> Many thanks.
Ok, got it working. In case anyone else is curious, here is what I do:
On the central instance, the web page uses standard AJAX to call back
to the Perl CGI page as a POST.
This page, extracts the form information, works out which regional
server to update and POST's the configuration update information to
that regional server using HTTP::Request::Common qw(POST) and
LWP::UserAgent.
The regional server is another Perl CGI script that pulls out the
information and makes local changes. Back on the central instance, it
checks the HTTP return code and then returns some HTML to say if it was
successful or not.
Works without changing pages and all the hard work is invisible to the
user.
------------------------------
Date: 25 Sep 2006 13:07:12 GMT
From: anno4000@radom.zrz.tu-berlin.de
Subject: Re: Federated CGI to CGI
Message-Id: <4nq2k0Fbf7tjU1@news.dfncis.de>
beowoof <matt.toy@gmail.com> wrote in comp.lang.perl.misc:
>
> axel@white-eagle.invalid.uk wrote:
> > beowoof <matt.toy@gmail.com> wrote:
> > > I have an interesting architecture that I'm trying to adapt a
> > > configuration interface to.
> >
> > > [ major snip ]
> >
> > Do you have a Perl problem?
> >
> > If not, you are in the wrong newsgroup.
> >
> > Axel
>
> Hiya,
>
> I thought I made it pretty clear that I'm using Perl CGI as the
> programming interface to achieve my desired outcome. In my example,
> Perl is both the front end web page people go to and also the backend
> CGI script engine to process the POST data and update the regional
> server configurations.
You mean you are using Perl to generate the web pages. That doesn't
make it a Perl question. Look at the answers you got. They don't
discuss Perl but general web techniques.
Anno
------------------------------
Date: Mon, 25 Sep 2006 11:48:01 -0500
From: "J. Gleixner" <glex_no-spam@qwest-spam-no.invalid>
Subject: Re: Federated CGI to CGI
Message-Id: <45180794$0$25782$815e3792@news.qwest.net>
beowoof wrote:
> server to update and POST's the configuration update information to
> that regional server using HTTP::Request::Common qw(POST) and
> LWP::UserAgent.
>
> The regional server is another Perl CGI script that pulls out the
> information and makes local changes. [...]
Hopefully you are using some sort of authentication both to get to
the initial page and to the remote servers, otherwise anyone
who knows the URL, on the remote servers, could make the
"local changes".
------------------------------
Date: 25 Sep 2006 03:37:17 -0700
From: "GAS" <ArcadyG@gmail.com>
Subject: Re: Net::Telnet, script exits after connection failure
Message-Id: <1159180637.755384.259300@d34g2000cwd.googlegroups.com>
--Jani-- wrote:
> I think I'll have to do as J. Gleixner said and try to find errmode config
> and change it to return.
Did you try something like this ?
sub MyConnect
{
my $hostName = shift;
my $oTelnet;
$oTelnet = Net::Telnet->new( Timeout => 30,
Prompt => '/#/',
Host => $hostName,
Errmode => sub { print "Telnet
connection to $hostName fail\n"; } );
return -1 unless ( defined $oTelnet);
print "Successfully connected to $hostName\n";
$oTelnet->close();
return 0;
}
Your script die because the default Errmode is "die" command.
------------------------------
Date: 25 Sep 2006 08:54:38 -0700
From: courtney.machi@gmail.com
Subject: Spreadsheet::WriteExcel & worksheet->write
Message-Id: <1159199678.014084.120570@b28g2000cwb.googlegroups.com>
Hi everyone,
I am grabbing database information using fetchrow() and storing the
results in variables. I need to write these results to an excel
spreadsheet. Does worksheet->write work when you're using variables? It
doesn't seem to like what I'm doing:
$worksheet1->write(0,0,$lastname);
$worksheet1->write(0,1,$platform);
$worksheet1->write(0,2,$balance);
when $lastname, $platform and $balance are the results from the
fetchrow()...
I can print these results OUT to a textfile, so I know they contain
data, but it just doesn't work with the spreadsheet.
Any suggestions?
Thanks,
Courtney
------------------------------
Date: Mon, 25 Sep 2006 17:23:50 +0100
From: David Squire <David.Squire@no.spam.from.here.au>
Subject: Re: Spreadsheet::WriteExcel & worksheet->write
Message-Id: <ef8vqm$im7$1@gemini.csx.cam.ac.uk>
courtney.machi@gmail.com wrote:
> Hi everyone,
>
> I am grabbing database information using fetchrow() and storing the
> results in variables. I need to write these results to an excel
> spreadsheet. Does worksheet->write work when you're using variables? It
> doesn't seem to like what I'm doing:
>
> $worksheet1->write(0,0,$lastname);
> $worksheet1->write(0,1,$platform);
> $worksheet1->write(0,2,$balance);
>
> when $lastname, $platform and $balance are the results from the
> fetchrow()...
> I can print these results OUT to a textfile, so I know they contain
> data, but it just doesn't work with the spreadsheet.
>
Could you please show us the code you use to populate these variables,
and to print them out successfully? That would help a lot...
DS
------------------------------
Date: 25 Sep 2006 09:27:52 -0700
From: "Paul Lalli" <mritty@gmail.com>
Subject: Re: Spreadsheet::WriteExcel & worksheet->write
Message-Id: <1159201672.829257.206060@d34g2000cwd.googlegroups.com>
courtney.machi@gmail.com wrote:
> I am grabbing database information using fetchrow() and storing the
> results in variables. I need to write these results to an excel
> spreadsheet. Does worksheet->write work when you're using variables?
ARRG!! I just responded to this in perl.beginners, not realizing you'd
posted an identical copy of the same message to another group. PLEASE
DON'T DO THAT! If you *NEED* to post to more than one group,
crosspost, do not multi-post!!
http://groups.google.com/group/perl.beginners/browse_frm/thread/2722b5f7816a8127/5a89cd83b68a7bc8#5a89cd83b68a7bc8
Paul Lalli
------------------------------
Date: 25 Sep 2006 03:18:44 -0700
From: "MoshiachNow" <lev.weissman@creo.com>
Subject: Tk- getOpenFile sticks on W2K server
Message-Id: <1159179524.834669.9000@i42g2000cwa.googlegroups.com>
HI,
It works nicely on my XP,but sticks on W2K.
Any suggestion for a better fileselct for Tk,or how to use getOpenFile
on W2k ?
Thanks
------------------------------
Date: Mon, 25 Sep 2006 12:06:38 GMT
From: zentara <zentara@highstream.net>
Subject: Re: Tk- getOpenFile sticks on W2K server
Message-Id: <62hfh2hvhgkrb0avv7pepks4lp5j1nd38s@4ax.com>
On 25 Sep 2006 03:18:44 -0700, "MoshiachNow" <lev.weissman@creo.com>
wrote:
>HI,
>
>It works nicely on my XP,but sticks on W2K.
>
>Any suggestion for a better fileselct for Tk,or how to use getOpenFile
>on W2k ?
>
>Thanks
Did you look at the requirements for ActiveStatePerl ( assuming that
is what you are using)? W2k needs to be at Service Pack 5+.
You can always write your own, like:
#!/usr/bin/perl
use strict;
use Tk;
require Tk::DirTree;
require Tk::Adjuster;
require Tk::TList;
# The initial directory
my $initial_dir = '/';
# The main window...
my $main = new MainWindow( -title => 'Explorer)' );
# A frame for the tree, adjuster and tlist
my $tree_adj_tablist = $main->Frame();
$tree_adj_tablist->pack(
-expand => 'yes',
-fill => 'both',
-side => 'top'
);
# A scrolled directory tree
my $tree = $tree_adj_tablist->Scrolled(
'DirTree',
-width => 35,
-height => 25,
-scrollbars => 'osoe',
-background => 'White',
-selectmode => 'single',
-selectbackground => 'DarkBlue',
-selectforeground => 'White',
-showhidden => 1,
-directory => $initial_dir
);
$tree->pack(
-expand => 'yes',
-fill => 'both',
-padx => 2,
-pady => 2,
-side => 'left'
);
# An adjuster
my $adjuster = $tree_adj_tablist->Adjuster(
-widget => $tree,
-side => 'left'
);
$adjuster->pack( -side => 'left', -fill => 'y' );
# A scrolled tab_list widget
my $tab_list = $tree_adj_tablist->Scrolled(
'TList',
-background => 'White',
-orient => 'vertical',
-selectmode => 'extended',
-scrollbars => 'os'
);
$tab_list->pack(
-expand => 'yes',
-fill => 'both',
-padx => 2,
-pady => 2,
-side => 'right'
);
# Ok button
my $ok = $main->Button(
-text => 'Ok',
-underline => 0,
-width => 4,
-command => sub { my $selected = $tab_list->info('selection');
#print "@{$selected}\n";
foreach( @{$selected} ){
print $tab_list->entrycget($_, '-text'),"\n";
}
})->pack( -side => 'right', -padx => 10, -pady => 10 );
# A Quit button (will be suppressed???...)
my $quit = $main->Button(
-text => 'Quit',
-underline => 0,
-width => 6,
-command => sub { exit }
);
$quit->pack( -side => 'right', -padx => 10, -pady => 10 );
# Configuring tree and tab_list widgets...
$tree->configure( -browsecmd => sub { list_dir( $tab_list, @_ ); } );
# We list the content of the initial dir inside the tab_list
list_dir( $tab_list, $initial_dir );
MainLoop();
#----------------------------------------------------------------------------
# Displays Dirs and files in TList widget
sub list_dir {
my ( $tab_list, $path ) = @_;
# Erase the TList content
$tab_list->delete( 0, 'end' );
opendir MY_DIR, $path or return;
foreach my $file ( sort readdir(MY_DIR) ) {
# Do not display '.' and '..'
next if ( $file eq '.' or $file eq '..' );
# Insert the files in the TList
$tab_list->insert( 'end', -text => $file );
}
closedir MY_DIR;
}
__END__
--
I'm not really a human, but I play one on earth.
http://zentara.net/japh.html
------------------------------
Date: 25 Sep 2006 06:26:54 -0700
From: "MoshiachNow" <lev.weissman@creo.com>
Subject: Re: Tk- getOpenFile sticks on W2K server
Message-Id: <1159190814.675650.208090@e3g2000cwe.googlegroups.com>
Great !!!
Thanks
------------------------------
Date: Mon, 25 Sep 2006 20:46:43 +1000
From: "Sisyphus" <sisyphus1@nomail.afraid.org>
Subject: Re: Tk-perl2exe FileSelect error
Message-Id: <4517b49b$0$11973$afc38c87@news.optusnet.com.au>
"MoshiachNow" <lev.weissman@creo.com> wrote in message
news:1159171845.811511.98440@d34g2000cwd.googlegroups.com...
> HI,
>
> My following code runs fine with Activestate on Windows:
> $FSref = $mw->FileSelect(-directory => "d:\\",-filter => "*.zip");
> $filename1 = $FSref->Show;
>
> However fails after perl2exe compilation.
> Appreciate any advise.
>
> Tk::Error:
> PLEASE SEE THE PERL2EXE USER MANUAL UNDER "Can't locate somemodule.pm
> in @INC"
> FOR AN EXPLANATION OF THE FOLLOWING MESSAGE:
Did you consult the manual for an explanation ? I don't have perl2exe so I
can't tell whether the info contained therein is useful or not - but I
suspect it might be of some assistance :-)
> Can't locate utf8.pm in @INC
.
.
Is there some switch that will enable the loading of utf8.pm ?
PAR's pp utility sometimes suffers a similar problem with the loading of
modules - but it enables the loading of specific modules by using the '-M'
switch in the command line (which usually fixes the problem) - in this case
it would be something like:
pp -M utf8 -o script.exe script.pl
Alternatively, you might find that if your script explicitly uses utf8, then
the problem disappears.
Cheers,
Rob
------------------------------
Date: 25 Sep 2006 04:28:24 -0700
From: "MoshiachNow" <lev.weissman@creo.com>
Subject: Re: Tk-perl2exe FileSelect error
Message-Id: <1159183704.755020.70440@i42g2000cwa.googlegroups.com>
> Did you consult the manual for an explanation ? I don't have perl2exe so I
> can't tell whether the info contained therein is useful or not - but I
> suspect it might be of some assistance :-)
>
> > Can't locate utf8.pm in @INC
> Is there some switch that will enable the loading of utf8.pm ?
Did consult the manual,nothing that they suggested helped.
> Alternatively, you might find that if your script explicitly uses utf8, then
> the problem disappears.
My script does not explicitely use utf8.pm...
Thanks
------------------------------
Date: Mon, 25 Sep 2006 21:43:17 +1000
From: "Sisyphus" <sisyphus1@nomail.afraid.org>
Subject: Re: Tk-perl2exe FileSelect error
Message-Id: <4517c1dc$0$27309$afc38c87@news.optusnet.com.au>
"MoshiachNow" <lev.weissman@creo.com> wrote in message
.
.
>
> My script does not explicitely use utf8.pm..
>
But maybe if it did, then the problem would disappear - ie, in your script:
use utf8;
(I don't know whether that will help, but it's not hard to find out :-)
Cheers,
Rob
------------------------------
Date: 25 Sep 2006 05:34:08 -0700
From: "MoshiachNow" <lev.weissman@creo.com>
Subject: Re: Tk-perl2exe FileSelect error
Message-Id: <1159187648.160598.142230@m73g2000cwd.googlegroups.com>
> But maybe if it did, then the problem would disappear - ie, in your script:
>
> use utf8;
>
"use utf8" did not work,but "require utf8" did work.
Thanks
P.S. why does this strange module give so much trouble ?I saw it
already 20 times or more ,using different modules...
------------------------------
Date: 25 Sep 2006 03:30:45 -0700
From: "mastermagrath" <polka.hanky@virgin.net>
Subject: windows problem with socket write
Message-Id: <1159180245.244794.120900@e3g2000cwe.googlegroups.com>
Hi all,
I've a problem with a simple socket client/server script which has bee
described in several threads already but alas none of them have been
able to help me.
Its the problem wherein any text i write to the server socket doesn't
get outpu until i close the client connection. All of the threads on
the subject all suggest the same thing i.e. make sure you send a
newline or carriage return or both with the string in question, i've
tried everything, i've tried sending:
"text to send\n"
"text to send\r\n"
"text to send\n\r"
Nothing works, nothing gets processed from the servers end until i
close down the client end, only then does the text get printed in the
server. I even tried sending an explicit EOF character with the string
but even that doesn't work!
I've dumped the very simple code below if anyone could take a look. Has
anyone got a very simple example script similar to this which works on
XP acitve state v5.8.8???
SERVER CODE:
$server = IO::Socket::INET->new(
Listen => 5,
LocalAddr => 'localhost',
LocalPort => 9000,
Proto => 'tcp');
die "ERROR: $!\n" unless $server;
print "Waiting on connections...\n";
while($client = $server->accept()){
print "Connection made, reading data...\n";
print <$client>;
print "Connection closed...\n";
}
$server->close();
CLIENT CODE:
$sock = IO::Socket::INET->new(
PeerAddr => 'localhost',
PeerPort => 9000,
Proto => 'tcp');
die "Error: $!\n" unless $sock;
$sock->autoflush(1);
print $sock "take me to your leader\r\n";
$answer=<$sock>;
print $answer;
close($sock);
------------------------------
Date: Mon, 25 Sep 2006 21:34:49 +1000
From: "Sisyphus" <sisyphus1@nomail.afraid.org>
Subject: Re: windows problem with socket write
Message-Id: <4517bfe4$0$11971$afc38c87@news.optusnet.com.au>
"mastermagrath" <polka.hanky@virgin.net> wrote in message
news:1159180245.244794.120900@e3g2000cwe.googlegroups.com...
> Hi all,
>
> I've a problem with a simple socket client/server script
.
.
>
> SERVER CODE:
>
> $server = IO::Socket::INET->new(
> Listen => 5,
> LocalAddr => 'localhost',
> LocalPort => 9000,
> Proto => 'tcp');
> die "ERROR: $!\n" unless $server;
>
> print "Waiting on connections...\n";
> while($client = $server->accept()){
> print "Connection made, reading data...\n";
> print <$client>;
> print "Connection closed...\n";
> }
>
> $server->close();
>
> CLIENT CODE:
>
> $sock = IO::Socket::INET->new(
> PeerAddr => 'localhost',
> PeerPort => 9000,
> Proto => 'tcp');
> die "Error: $!\n" unless $sock;
> $sock->autoflush(1);
> print $sock "take me to your leader\r\n";
> $answer=<$sock>;
> print $answer;
>
> close($sock);
>
Your 'print <$client>;' in the server script does not function as you
expect, the specification of 'LocalAddr => 'localhost,' in the server script
seems to stuff things up, and the client script is waiting for a reply from
the server but is not getting one. This modified server script works ok for
me:
use IO::Socket;
use warnings;
$server = IO::Socket::INET->new(
Listen => 5,
LocalPort => 9000,
Proto => 'tcp');
die "ERROR: $!\n" unless $server;
print "Waiting on connections...\n";
while($client = $server->accept()){
print "Connection made, reading data...\n";
$data_read = <$client>;
print $data_read, "\n";
print $client "Message received ... bye\n";
print "Connection closed...\n";
}
$server->close();
(All I think I've done differently is have the server print a reply to
$client, delete the 'LocalAddr' setting from the new() constructor, and
assign '<client>' to $data_read, rather than try to print it out directly.)
Cheers,
Rob
------------------------------
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 9763
***************************************
