[26806] in Perl-Users-Digest
Perl-Users Digest, Issue: 8849 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Jan 13 21:06:03 2006
Date: Fri, 13 Jan 2006 18:05:31 -0800 (PST)
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, 13 Jan 2006 Volume: 10 Number: 8849
Today's topics:
ExpatXS: 'Can't call method "read" on an undefined valu <nomail@sorry.com>
form fields <nospam@home.com>
Re: form fields <jgibson@mail.arc.nasa.gov>
Re: form fields <nospam@home.com>
How to add hostname, reverse name to IP? <speediercoREMOVE_THIS@yahoo.com>
Re: How to add hostname, reverse name to IP? <noreply@gunnar.cc>
Re: How to add hostname, reverse name to IP? <tintin@invalid.invalid>
Re: How to add hostname, reverse name to IP? <tadmc@augustmail.com>
Re: IO::Pipe and loss of data <none@here.com>
Re: IO::Pipe and loss of data <nospam-abuse@ilyaz.org>
Loops with loops using html-template <me@invalid.domain>
Re: merciless garbage collector <tadmc@augustmail.com>
Re: merciless garbage collector <ralf@tecont.de>
Newbie perl and flash thing <tony@heagren.com>
Re: Newbie perl and flash thing <jgibson@mail.arc.nasa.gov>
Re: Place to install images associated with perl script <kluff@enterprise.net>
Re: Place to install images associated with perl script <matthew.garrish@sympatico.ca>
Re: Place to install images associated with perl script <.@.>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 13 Jan 2006 16:24:06 -0800
From: Arvin Portlock <nomail@sorry.com>
Subject: ExpatXS: 'Can't call method "read" on an undefined value' after ca. 500 XML files
Message-Id: <dq9gb7$219p$1@agate.berkeley.edu>
In using ExpatXS to parse large batches of XML files
something curious happens. After parsing something close
to 500 files the program crashes with the error:
Can't call method "read" on an undefined value at
/xxx/perl5.8/lib/site_perl/5.8.7/sun4-solaris-thread-multi/
XML/SAX/ExpatXS.pm line 155.
Of course I examined the files where the errors occurred
and there is nothing wrong with them. I can do this on any
batch of files and get the same problem--permissions are
always set correctly, the files are confirmed well-formed,
etc.
Sounds like something's leaking.
I reduced my big complex program down to something very
simple which doesn't actually do anything. It still crashes
after (successfully) parsing around 500 files. Can somebody
test this script on a large batch of files, or otherwise tell
me what I'm (or ExpatXS) is doing wrong? Maybe it's a problem
with XML::Filter?
# $Id: ExpatXS.pm,v 1.39 2005/11/10 09:38:31 cvspetr Exp $
This is perl, v5.8.7 built for sun4-solaris-thread-multi
Simple program follows:
use XML::SAX;
use XML::Filter::BufferText;
use File::Path;
use strict 'vars';
my $dir = '/home/xmldocs/lib1';
opendir (DIR, $dir);
my @xmlfiles = grep (/\.xml/, readdir (DIR));
closedir (DIR);
foreach my $file (sort @xmlfiles) {
my $fullpath = "$dir/$file";
print STDERR "$fullpath\n";
my $handler = new MySAXHandler;
my $filter = new XML::Filter::BufferText (Handler => $handler);
my $parser = XML::SAX::ParserFactory->parser(Handler => $filter);
$parser->parse_uri($fullpath);
undef $parser;
undef $filter;
undef $handler;
}
package MySAXHandler;
use base qw(XML::SAX::Base);
sub start_element {
}
sub end_element {
}
------------------------------
Date: Fri, 13 Jan 2006 02:00:38 GMT
From: "Nospam" <nospam@home.com>
Subject: form fields
Message-Id: <aRDxf.1054$77.293@newsfe3-win.ntli.net>
I am trying to decipher how mechanize views the form fields on a html page,
I used this method form->input->possible_values(); however the results are
hash values and I have no idea how to convert them to the scalar values,
this is my code:
#!Perl\bin\perl
use strict;
use warnings;
use WWW::Mechanize;
use HTML::Form;
my $url ='http://www.warservers.com/f/posting~mode~newtopic~f~3.htm';
my $mech = WWW::Mechanize->new();
my $form = HTML::Form->parse(my $html,$url);
$mech->get( $url );
$mech->success or die $mech->response->status_line;
print my @forms = $mech->forms();
print $mech->forms();
print $mech->$form->inputs->possible_values();
The output is:
HTML::Form=HASH(0x29c35d8)HTML::Form=HASH(0x29c3470)HTML::Form=HASH(0x29c35d
8)HT
ML::Form=HASH(0x29c3470)
Obviously I was looking for something like: username, message, subject, how
would I conver this hash values to username, subject and message as stated
on the html of the $url?
------------------------------
Date: Thu, 12 Jan 2006 18:27:15 -0800
From: Jim Gibson <jgibson@mail.arc.nasa.gov>
Subject: Re: form fields
Message-Id: <120120061827156422%jgibson@mail.arc.nasa.gov>
In article <aRDxf.1054$77.293@newsfe3-win.ntli.net>, Nospam
<nospam@home.com> wrote:
> I am trying to decipher how mechanize views the form fields on a html page,
> I used this method form->input->possible_values(); however the results are
> hash values and I have no idea how to convert them to the scalar values,
> this is my code:
>
> #!Perl\bin\perl
> use strict;
> use warnings;
> use WWW::Mechanize;
> use HTML::Form;
>
> my $url ='http://www.warservers.com/f/posting~mode~newtopic~f~3.htm';
> my $mech = WWW::Mechanize->new();
> my $form = HTML::Form->parse(my $html,$url);
You are attempting to parse an empty HTML document here.
>
> $mech->get( $url );
> $mech->success or die $mech->response->status_line;
> print my @forms = $mech->forms();
> print $mech->forms();
> print $mech->$form->inputs->possible_values();
What do you think this line is doing (I really don't have a clue)?
>
>
> The output is:
>
> HTML::Form=HASH(0x29c35d8)HTML::Form=HASH(0x29c3470)HTML::Form=HASH(0x29c35d
> 8)HT
> ML::Form=HASH(0x29c3470)
>
> Obviously I was looking for something like: username, message, subject, how
> would I conver this hash values to username, subject and message as stated
> on the html of the $url?
WWW::Mechanize::forms returns a list of forms in list context. Each
member of the list is an instance of HTML::Form. Hence your output. Use
Data::Dumper to investigate what lies within the @forms array, or read
the documentation on HTML::Form to find out how to access the
individual form elements using HTML::Form::inputs and
HTML::Form::find_input, etc.
I have used neither WWW::Mechanize nor HTML::Form, but was able to
glean the above information from reading the documentation. This is
always a recommended first step when trying to figure out what is going
on.
Posted Via Usenet.com Premium Usenet Newsgroup Services
----------------------------------------------------------
** SPEED ** RETENTION ** COMPLETION ** ANONYMITY **
----------------------------------------------------------
http://www.usenet.com
------------------------------
Date: Fri, 13 Jan 2006 13:32:36 GMT
From: "Nospam" <nospam@home.com>
Subject: Re: form fields
Message-Id: <UZNxf.90457$7p5.4817@newsfe4-win.ntli.net>
maybe I should have stressed that what I am looking to do is find the fields
of the form on this url,
'http://www.warservers.com/f/posting~mode~newtopic~f~3.htm'
it is from the documentation that I obtained:
inputs->possible_values();
which I hoped would show me the possible fields on the form at
'http://www.warservers.com/f/posting~mode~newtopic~f~3.htm'
I was expecting it to print out username, subject and message fields, but I
do not understand what it printed out, and neither does the html::form or
mechanize module documentation say how to convert those HASH values to their
respective fields.
I stress again maybe I should have stated that I am looking for perl to
print out the fiels on the form, not the form itself, just as looking at the
page has a username field, a subject field, and message field, I am trying
to get perl either via mechanize or html::form to output these fields on the
console
------------------------------
Date: Tue, 10 Jan 2006 21:29:05 -0500
From: "OttawaTrade" <speediercoREMOVE_THIS@yahoo.com>
Subject: How to add hostname, reverse name to IP?
Message-Id: <S3_wf.106446$826.80433@fe16.lga>
Everything sent from my server is a spam by any email filter. So I wonder
why. The hosting company gave a reverse name to my IP.
ping -a myip.111.111.111 output-> ip.hostingcompany.com
ping ip.hostingcompany.com output-> Unknown host ip.hostingcompany.com
Beause email email is sent from Everyemail is sent as
username@ip.hostingcompany.com and ip.hostingcompany.com is an unknown host,
so all spam filter thinks it is spam.
I already add hostname mydomain.com to rc.conf
Do I need to change DNS, Bind too?
My host said something that I can report a name to them so they can register
the reverse name to my IP. Which I don't want to do. I just want my IP has
no hostname associated to when do ping -a myip.111.111.111
------------------------------
Date: Wed, 11 Jan 2006 04:07:53 +0100
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: How to add hostname, reverse name to IP?
Message-Id: <42jb49F1j05c1U1@individual.net>
OttawaTrade wrote:
> email is sent from Everyemail is sent as
> username@ip.hostingcompany.com and ip.hostingcompany.com is an unknown host,
> so all spam filter thinks it is spam.
<snip>
> My host said something that I can report a name to them so they can register
> the reverse name to my IP. Which I don't want to do.
Why not? Because you _are_ a spammer?
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Wed, 11 Jan 2006 18:45:16 +1300
From: "Tintin" <tintin@invalid.invalid>
Subject: Re: How to add hostname, reverse name to IP?
Message-Id: <uX0xf.13980$vH5.735810@news.xtra.co.nz>
"OttawaTrade" <speediercoREMOVE_THIS@yahoo.com> wrote in message
news:S3_wf.106446$826.80433@fe16.lga...
> Everything sent from my server is a spam by any email filter. So I wonder
> why. The hosting company gave a reverse name to my IP.
>
> ping -a myip.111.111.111 output-> ip.hostingcompany.com
> ping ip.hostingcompany.com output-> Unknown host ip.hostingcompany.com
>
> Beause email email is sent from Everyemail is sent as
> username@ip.hostingcompany.com and ip.hostingcompany.com is an unknown
host,
> so all spam filter thinks it is spam.
>
> I already add hostname mydomain.com to rc.conf
>
> Do I need to change DNS, Bind too?
>
> My host said something that I can report a name to them so they can
register
> the reverse name to my IP. Which I don't want to do. I just want my IP has
> no hostname associated to when do ping -a myip.111.111.111
The mail, Unix and networking groups are all that way ------->
------------------------------
Date: Wed, 11 Jan 2006 06:29:27 -0600
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: How to add hostname, reverse name to IP?
Message-Id: <slrnds9uh7.isv.tadmc@magna.augustmail.com>
OttawaTrade <speediercoREMOVE_THIS@yahoo.com> wrote:
> Everything sent from my server is a spam by any email filter. So I wonder
> why. The hosting company gave a reverse name to my IP.
>
> ping -a myip.111.111.111 output-> ip.hostingcompany.com
> ping ip.hostingcompany.com output-> Unknown host ip.hostingcompany.com
>
> Beause email email is sent from Everyemail is sent as
> username@ip.hostingcompany.com and ip.hostingcompany.com is an unknown host,
> so all spam filter thinks it is spam.
>
> I already add hostname mydomain.com to rc.conf
>
> Do I need to change DNS, Bind too?
>
> My host said something that I can report a name to them so they can register
> the reverse name to my IP. Which I don't want to do. I just want my IP has
> no hostname associated to when do ping -a myip.111.111.111
You need to fix the error on line 17 of your Perl program.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 11 Jan 2006 11:26:20 +0100
From: "Genevieve S." <none@here.com>
Subject: Re: IO::Pipe and loss of data
Message-Id: <dq2mgd$69j$1@news.sap-ag.de>
<xhoster@gmail.com> wrote in message
news:20060109125551.943$NM@newsreader.com...
> Maybe, maybe not. I think that $line = <$pipe_log>; is executed first as
> a
> read from pipe_log into some anonymous storage, then as an assignment from
> that storage into $line. If the interuption happens after (or during)
> the read but before the assingment, then $line will show no hint of the
> missing data, (other than being empty, which event is silently ignored in
> the code as you originally posted it.)
Ok, now that you say this, it sounds completely logical.
> This definitely makes me thinkg the problem is with the time-out, and not
> with the pipe itself.
You're right.
I changed that evil eval thing. First left it out completely and then
replaced it with something different. It now runs for full 24 hours (I
wanted to wait for that with my answere to be sure) not telling me about
loosing even a single line... So not the pipe causes the error (btw it now
runs with a named pipe and writers lock that one to use it).
xhoster you'd deserve a least a big hug (yes, in times of remedy my female
attributes break through)! Thank you so much.
------------------------------
Date: Thu, 12 Jan 2006 16:39:22 +0000 (UTC)
From: Ilya Zakharevich <nospam-abuse@ilyaz.org>
Subject: Re: IO::Pipe and loss of data
Message-Id: <dq60np$1208$1@agate.berkeley.edu>
[A complimentary Cc of this posting was sent to
<xhoster@gmail.com>], who wrote in article <20060109125551.943$NM@newsreader.com>:
> > >> eval {
> > >> local $SIG{ALRM} = sub { die "lesedauer" };
> > >> alarm(1);
> > >> $line = <$pipe_log>;
> > >> alarm(0);
> > >> };
...
> Maybe, maybe not. I think that $line = <$pipe_log>; is executed first as a
> read from pipe_log into some anonymous storage, then as an assignment from
> that storage into $line. If the interuption happens after (or during)
> the read but before the assingment, then $line will show no hint of the
> missing data, (other than being empty, which event is silently ignored in
> the code as you originally posted it.)
My impression was that signals are delivered at statement boundaries
(with the new, unreliable, signal model). So this should not be
applicable to 5.8 or some such.
Puzzled,
Ilya
------------------------------
Date: Thu, 12 Jan 2006 14:25:38 +0200
From: Me <me@invalid.domain>
Subject: Loops with loops using html-template
Message-Id: <3YCdneKJAJhQ11veRVn-rA@is.co.za>
How do I contruct an array of hash references( or arrays) such that
I can have the following loops in html-template:
<MAIN_LOOPP>
DATA1
DATAN
<OTHER-LOOP>
O-DATA1
O-DATAN
</OTHER-LOOP>
</MAIN_LOOP>
------------------------------
Date: Tue, 10 Jan 2006 18:20:08 -0600
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: merciless garbage collector
Message-Id: <slrnds8jpo.fg8.tadmc@magna.augustmail.com>
Krystian <nobody@this.home.com> wrote:
> for(my $i=0; $i<50; $i++) {
for my $i ( 0 .. 49 ) {
Which is easier to read and understand?
:-)
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 11 Jan 2006 19:40:38 +0100
From: Ralf Muschall <ralf@tecont.de>
Subject: Re: merciless garbage collector
Message-Id: <720g93-424.ln1@prcm.tecont.de>
Tad McClellan wrote:
> Krystian <nobody@this.home.com> wrote:
>> for(my $i=0; $i<50; $i++) {
>
> for my $i ( 0 .. 49 ) {
> Which is easier to read and understand?
The first.
(1) It gets parsed directly in the visual cortex,
telling the conscious parts of the brain just
"this is an ordinary loop from 0 to 49" ;-)
(2) It has almost all spaces in the usual places, except
that I'd expect a space after "for" (to ease the
recognition of the difference between function calls
and keywords, probably unnecessary with syntax highlighting).
I'd write the second as follows:
for my $i (0..49) {
In addition, the second form requires the reader to know since
when Perl optimizes the (..) inside a loop into a sequential
call, and whether all the target systems already have such a
modern version. Otherwise,
for my $i (0..10000000) {
might kill the programm (or even the machine) with a SIGSEGV even
before the loop body starts.
Ralf
------------------------------
Date: Thu, 12 Jan 2006 17:32:10 GMT
From: Tony Heagren <tony@heagren.com>
Subject: Newbie perl and flash thing
Message-Id: <2006011217321116807-tony@heagrencom>
Hi all...
very new to perl - very into flash.
I have a basic application where flash reads and displays text from 8
.txt files on a server.
I'm building a system where the admin user can rewrite these files.
I'm stuck on this:
Flash sends a variable to perl called "me" - this is the name of the
file to open.
(i.e. me=1.txt or me=2.txt)
How can I write the perl to understand this ?
i.e. I don't want to have to have update1.pl, update2.pl update3.pl etc..
I just want one script which will open the file specified by flash as "me"
rewrite and close it.
I've been using this to do it on a file by file basis so far with
specific reference to each file
to open and rewrite and it works fine - what I want to change is the
specific file reference
so that one script can do all the work.
#!/usr/bin/perl
use CGI qw/:standard/;
use CGI::Carp qw(fatalsToBrowser);
my $query = new CGI;
print header;
open(FILE,">../copy/about.txt") or print "sorted=NOGO";
$new_copy = "1copy=" . $query->param('new_copy');
print FILE "$new_copy";
close FILE;
print "sorted=bingo";
All and any advice much appreciated.
Tony
------------------------------
Date: Thu, 12 Jan 2006 10:26:05 -0800
From: Jim Gibson <jgibson@mail.arc.nasa.gov>
Subject: Re: Newbie perl and flash thing
Message-Id: <120120061026054943%jgibson@mail.arc.nasa.gov>
In article <2006011217321116807-tony@heagrencom>, Tony Heagren
<tony@heagren.com> wrote:
> Hi all...
>
> very new to perl - very into flash.
>
> I have a basic application where flash reads and displays text from 8
> .txt files on a server.
> I'm building a system where the admin user can rewrite these files.
> I'm stuck on this:
>
> Flash sends a variable to perl called "me" - this is the name of the
> file to open.
> (i.e. me=1.txt or me=2.txt)
> How can I write the perl to understand this ?
> i.e. I don't want to have to have update1.pl, update2.pl update3.pl etc..
> I just want one script which will open the file specified by flash as "me"
> rewrite and close it.
>
> I've been using this to do it on a file by file basis so far with
> specific reference to each file
> to open and rewrite and it works fine - what I want to change is the
> specific file reference
> so that one script can do all the work.
>
> #!/usr/bin/perl
> use CGI qw/:standard/;
> use CGI::Carp qw(fatalsToBrowser);
> my $query = new CGI;
> print header;
> open(FILE,">../copy/about.txt") or print "sorted=NOGO";
> $new_copy = "1copy=" . $query->param('new_copy');
> print FILE "$new_copy";
> close FILE;
> print "sorted=bingo";
>
> All and any advice much appreciated.
I don't know how your flash is sending data to perl, but the above
looks like a CGI program. Can't you pass the name of the file as a
parameter?
my $file = $query->param('file_to_copy');
open(FILE,'>',"../copy/$file") or print "sorted=NOGO";
...
The other option is sending the file name as a command-line argument,
if that is possible, in which case the file name will end up in the
@ARGV array.
Posted Via Usenet.com Premium Usenet Newsgroup Services
----------------------------------------------------------
** SPEED ** RETENTION ** COMPLETION ** ANONYMITY **
----------------------------------------------------------
http://www.usenet.com
------------------------------
Date: Wed, 11 Jan 2006 20:07:15 +0000
From: Kevin Luff <kluff@enterprise.net>
Subject: Re: Place to install images associated with perl script
Message-Id: <dq3ohi$sak$1@domitilla.aioe.org>
BlinKol wrote:
> Considering a script that needs a fixed stock of images during its
> process and knowing that this stock shouldn't be accessible out of the
> script, where would you install these images ?
>
> In my mind, the best would be to upload them in the same directory as
> the Perl script himself, but it doesn't work : server-log says that the
> image file is not exacutable and that it don't know how to handle it.
>
> Here is a short test script to show what I want to say :
>
> -- BEGIN OF /cgi-bin/test/test.pl SCRIPT --
> #!c:/perl/bin/Perl.exe
>
> print "Content-type: text/html\n\n";
> print "<HTML><BODY>";
> print "<img src='/cgi-bin/test/test.gif' border=0>";
> print "</BODY></HTML>";
> exit 0;
> -- END OF SCRIPT --
>
> The image doesn't appear in browser and server's error log says :
> "script not found or unable to stat: C:/sites/vhosts/dev/cgi-
> bin/test/test.gif, referer: http://dev-desk/cgi-bin/test/test.pl"
>
> Also, this test has been ran in Apache/ActivePerl under Windows, whitout
> permission concern.
>
> Do you have an idea about this error ? How would you do ?
A quick and dirty fix would be -
assuming you can do http://dev-desk/cgi-bin/test/test.gif in your
browser and get the image - would be to have that URL as the IMG SRC
------------------------------
Date: Wed, 11 Jan 2006 15:02:04 -0500
From: "Matt Garrish" <matthew.garrish@sympatico.ca>
Subject: Re: Place to install images associated with perl script
Message-Id: <Yudxf.18938$W03.510382@news20.bellglobal.com>
"BlinKol" <.@.> wrote in message
news:MPG.1e2f7d50efc721e6989739@news.tiscali.fr...
> Considering a script that needs a fixed stock of images during its
> process and knowing that this stock shouldn't be accessible out of the
> script, where would you install these images ?
>
> In my mind, the best would be to upload them in the same directory as
> the Perl script himself, but it doesn't work : server-log says that the
> image file is not exacutable and that it don't know how to handle it.
>
<snip html>
>
> The image doesn't appear in browser and server's error log says :
> "script not found or unable to stat: C:/sites/vhosts/dev/cgi-
> bin/test/test.gif, referer: http://dev-desk/cgi-bin/test/test.pl"
>
> Also, this test has been ran in Apache/ActivePerl under Windows, whitout
> permission concern.
>
> Do you have an idea about this error ? How would you do ?
The error arises because you've put non-executable files in an executable
directory. Please be aware that so long as the images are in a web-readable
directory, they will be viewable by anyone. You may think this is working on
Windows, but I suspect anyone can access the images regardless of whether
they're using your script or not. You may want to consider replacing the
links directly to the images with links to a script that will only stream
the images based on some sort of user validation. This really has nothing to
do with Perl, however, so I would suggest that you take the problem to
comp.infosystems.www.authoring.cgi or some other relevant group if you want
more information.
Matt
------------------------------
Date: Wed, 11 Jan 2006 22:12:57 +0100
From: BlinKol <.@.>
Subject: Re: Place to install images associated with perl script
Message-Id: <MPG.1e2f933f6157e8e0989740@news.tiscali.fr>
In article <Yudxf.18938$W03.510382@news20.bellglobal.com>,
matthew.garrish@sympatico.ca says...
> o with Perl, however, so I would suggest that you take the problem to
> comp.infosystems.www.authoring.cgi or some other relevant group if you want
> more information.
>
>
Thanks. Just done in comp.infosystems.www.authoring.cgi.
------------------------------
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 8849
***************************************
