[25270] in Perl-Users-Digest
Perl-Users Digest, Issue: 7515 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Dec 13 18:05:41 2004
Date: Mon, 13 Dec 2004 15:05:11 -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 Mon, 13 Dec 2004 Volume: 10 Number: 7515
Today's topics:
Re: Communication between Cgi and another perl applicat <bart.lateur@pandora.be>
Re: Consecutive Numbers (Gary E. Ansok)
Re: Consecutive Numbers (Anno Siegel)
Re: forwarding cgi->param() krakle@visto.com
Re: forwarding cgi->param() (Anno Siegel)
hashes anon1ed2@nyx.net
Re: hashes <spamtrap@dot-app.org>
Re: hashes anon1ed2@nyx.net
Re: hashes <spamtrap@dot-app.org>
Re: hashes <spamtrap@dot-app.org>
Re: hashes xhoster@gmail.com
how to read email automatically without POP3 and IMAP s <zhangd@tycoelectronics.com>
Re: how to read email automatically without POP3 and IM <zhangd@tycoelectronics.com>
Re: how to read email automatically without POP3 and IM <zhangd@tycoelectronics.com>
Re: how to read email automatically without POP3 and IM AaronJSherman@gmail.com
Re: how to read email automatically without POP3 and IM <zhangd@tycoelectronics.com>
Re: how to read email automatically without POP3 and IM <abigail@abigail.nl>
Re: how to read email automatically without POP3 and IM <matthew.garrish@sympatico.ca>
Re: how to read email automatically without POP3 and IM <zhangd@tycoelectronics.com>
Re: how to read email automatically without POP3 and IM <abigail@abigail.nl>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 13 Dec 2004 14:08:19 GMT
From: Bart Lateur <bart.lateur@pandora.be>
Subject: Re: Communication between Cgi and another perl application
Message-Id: <5s7rr0184cka5hlqmvq3vfb05fl7lu3tfd@4ax.com>
Giojo wrote:
>Now, I don't know in witch way they should communicate...
>1)through text file shared?
>2)through memory shared?
>I'd prefer the second one, I think is more useful then the first... What do
>you think?
Tradition is to use sockets (such as TCP).
Also check out the included docs "perlipc"
<http://theoryx5.uwinnipeg.ca/CPAN/perl/pod/perlipc.html>
A good book on networking with perl is "Network Programming with Perl"
by Lincoln Stein.
<http://modperl.com:9000/perl_networking/>
You can always write a little command line utility that takes its data
from STDIN or via the command line, and passes it along to the server
(=daemon).
--
Bart.
------------------------------
Date: Mon, 13 Dec 2004 18:51:58 +0000 (UTC)
From: ansok@alumni.caltech.edu (Gary E. Ansok)
Subject: Re: Consecutive Numbers
Message-Id: <cpkoce$o7a$1@naig.caltech.edu>
In article <Xns95BDB5D279355grahamdrabblelineone@ID-77355.user.dfncis.de>,
Graham Drabble <graham.drabble@lineone.net> wrote:
>I have a file that contains a list of numbers. I'm trying to process
>the file to find out how many rows start with 4 consecutive numbers
>(either ascending or decending). Currently I've got
>
>use strict;
>use warnings;
>
>open (IN, '4bell.txt') or die "Can't open IN: $!";
>
>my $runs = 0;
>while(<IN>){
> chomp;
> my $first = substr($_,0,1);
> my $asc = $first . $first+1 . $first+2 . $first+3;
> my $des = $first . $first-1 . $first-2 . $first-3;
> if (/^($asc|$des)/){
> $runs++
> }
>}
>print "There were $runs runs\n";
>
>IN
>12345867
>23457658
>34568765
>43215687
>13245678
>
>Prints
>There were 4 runs
>
>which is correct. However I can't help but think there must be a
>shorter solution but can't think of it. Any ideas? The file could
>contain up to 5000 lines.
Since this is Perl, a solution involving a hash is always worth considering:
use strict;
use warnings;
open (IN, '4bell.txt') or die "Can't open IN: $!";
my @run_list = qw/0123 1234 2345 3456 4567 5678 6789
3210 4321 5432 6543 7654 8765 9876/;
my %run_hash;
@run_hash{@run_list} = ();
my $runs = 0;
while (<IN>) {
$runs++ if exists $run_hash{substr($_,0,4)};
}
print "There were $runs runs\n";
Gary Ansok
--
Rule #87: If the thought of something makes me giggle for longer than 15
seconds, I am to assume that I am not allowed to do it.
-- www.skippyslist.com
------------------------------
Date: 13 Dec 2004 19:22:31 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Consecutive Numbers
Message-Id: <cpkq5n$smq$1@mamenchi.zrz.TU-Berlin.DE>
Gary E. Ansok <ansok@alumni.caltech.edu> wrote in comp.lang.perl.misc:
> In article <Xns95BDB5D279355grahamdrabblelineone@ID-77355.user.dfncis.de>,
> Graham Drabble <graham.drabble@lineone.net> wrote:
> >I have a file that contains a list of numbers. I'm trying to process
> >the file to find out how many rows start with 4 consecutive numbers
> >(either ascending or decending). Currently I've got
> >
> >use strict;
> >use warnings;
> >
> >open (IN, '4bell.txt') or die "Can't open IN: $!";
> >
> >my $runs = 0;
> >while(<IN>){
> > chomp;
> > my $first = substr($_,0,1);
> > my $asc = $first . $first+1 . $first+2 . $first+3;
> > my $des = $first . $first-1 . $first-2 . $first-3;
> > if (/^($asc|$des)/){
> > $runs++
> > }
> >}
> >print "There were $runs runs\n";
> >
> >IN
> >12345867
> >23457658
> >34568765
> >43215687
> >13245678
> >
> >Prints
> >There were 4 runs
> >
> >which is correct. However I can't help but think there must be a
> >shorter solution but can't think of it. Any ideas? The file could
> >contain up to 5000 lines.
>
> Since this is Perl, a solution involving a hash is always worth considering:
>
> use strict;
> use warnings;
>
> open (IN, '4bell.txt') or die "Can't open IN: $!";
>
> my @run_list = qw/0123 1234 2345 3456 4567 5678 6789
> 3210 4321 5432 6543 7654 8765 9876/;
> my %run_hash;
> @run_hash{@run_list} = ();
> my $runs = 0;
>
> while (<IN>) {
> $runs++ if exists $run_hash{substr($_,0,4)};
> }
>
> print "There were $runs runs\n";
Fastest yet, by quite a margin, according to my inofficial score table:
regex (Abigail) 8 seconds
index (Ilya) 7 seconds
hash (Gary) 4 seconds
Anything that as much as calls a sub in the loop is out (> 10 seconds).
Anno
------------------------------
Date: 13 Dec 2004 10:10:42 -0800
From: krakle@visto.com
Subject: Re: forwarding cgi->param()
Message-Id: <1102961442.329420.97440@c13g2000cwb.googlegroups.com>
David Efflandt wrote:
> On 10 Dec 2004 19:15:16 -0800, krakle@visto.com <krakle@visto.com>
wrote:
> >
> > David Efflandt wrote:
> >> On Fri, 10 Dec 2004 21:27:14 +0000, Colombo <colo@megapolis.pl>
> > wrote:
> >> > hi,
> >> > how to forward parameters from $cgi->param() to another page
when I
> >
> >> > don't know how many parameters are there and how they are
called?
> >>
> >> Not clear if you are generating another form and want to pass
> > variables
> >> through it, or attempting to redirect them to some other handler.
> > But to
> >> pass submitted variables through another form as hidden variables,
> >> somewhere within the CGI generated form do something like:
> >>
> >> foreach ($cgi->param) { print $cgi->hidden($_), "\n"; }
> > Their is VARS..
> >
> > my $FORM = $cgi->Vars;
>
> Perhaps you mean: my %FORM = $cgi->VARS;
Yes a hash. Sorry.
------------------------------
Date: 13 Dec 2004 18:56:00 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: forwarding cgi->param()
Message-Id: <cpkok0$rnp$1@mamenchi.zrz.TU-Berlin.DE>
<krakle@visto.com> wrote in comp.lang.perl.misc:
>
> David Efflandt wrote:
> > On 10 Dec 2004 19:15:16 -0800, krakle@visto.com <krakle@visto.com>
> wrote:
> > >
> > > David Efflandt wrote:
> > >> On Fri, 10 Dec 2004 21:27:14 +0000, Colombo <colo@megapolis.pl>
> > > wrote:
> > >> > hi,
> > >> > how to forward parameters from $cgi->param() to another page
> when I
> > >
> > >> > don't know how many parameters are there and how they are
> called?
> > >>
> > >> Not clear if you are generating another form and want to pass
> > > variables
> > >> through it, or attempting to redirect them to some other handler.
> > > But to
> > >> pass submitted variables through another form as hidden variables,
> > >> somewhere within the CGI generated form do something like:
> > >>
> > >> foreach ($cgi->param) { print $cgi->hidden($_), "\n"; }
> > > Their is VARS..
> > >
> > > my $FORM = $cgi->Vars;
> >
> > Perhaps you mean: my %FORM = $cgi->VARS;
>
> Yes a hash. Sorry.
According to "perldoc CGI" both work. A hashref (to a tied hash) is
returned to the scalar. An untied hash is probably preferable unless
you want to change variables through the hash, which is what the tie does.
Anno
------------------------------
Date: 13 Dec 2004 13:49:47 -0800
From: anon1ed2@nyx.net
Subject: hashes
Message-Id: <1102974587.739725.19920@c13g2000cwb.googlegroups.com>
I'm working through O'Reilly's "Learning Perl" (i.e., the llama book),
and I cannot get hashes (~p. 16) to work. I'm using ActiveState
binaries (v5.6.1) on the Windows XP Pro (v. 5.1) command line. Any
suggestions?
thx,
caius
------------------------------
Date: Mon, 13 Dec 2004 17:01:21 -0500
From: Sherm Pendley <spamtrap@dot-app.org>
Subject: Re: hashes
Message-Id: <kuSdnS0gWKysjCPcRVn-1A@adelphia.com>
anon1ed2@nyx.net wrote:
> I'm working through O'Reilly's "Learning Perl" (i.e., the llama book),
> and I cannot get hashes (~p. 16) to work. I'm using ActiveState
> binaries (v5.6.1) on the Windows XP Pro (v. 5.1) command line. Any
> suggestions?
Two suggestions:
First, have you read the posting guidelines that appear here about twice
a week? If not, you should.
Second, you need to tell us exactly what you mean by "I cannot get
hashes to work." We can't see from here what you've tried and what the
result were.
sherm--
--
Cocoa programming in Perl: http://camelbones.sourceforge.net
Hire me! My resume: http://www.dot-app.org
------------------------------
Date: 13 Dec 2004 14:37:07 -0800
From: anon1ed2@nyx.net
Subject: Re: hashes
Message-Id: <1102977427.915625.146280@z14g2000cwz.googlegroups.com>
Sherm -- good to hear from you buddy!
The code, per your request, is as so:
#!/usr/bin/perl -w
my %wordsTbl = (
john => "camel",
paul => "llama",
ringo => "alpaca",
george => "horse",
);
print "What is your name? ";
$name = <STDIN>;
chomp ($name);
if ($name eq "caius") {
print "Hello $name, it's wonderful you're here!\n";
} else {
print "What's your story $name?\n"; #cautious greeting
$secretword = $wordsTbl($name); #DIES HERE!
print "Hock! $secretword\n";
print "What's the secret word? ";
$guess = <STDIN>;
chomp ($guess);
while ($guess ne $secretword) { # keep checking til we know
print "Wrong, try again. What is the secret word? ";
$guess = <STDIN>;
chomp ($guess);
} # end while
} # end else
Error message, per your request, is as so:
Syntax error at tst6.pl line 16, near "$wordsTbl("
Execution aborted due to compilation errors.
Tried playing with all kinds of variations to no avail.
I didn't initially include the code because, as far as
I can tell, there is no syntax error, and I wondered if
this was just a standard error about which perl
people know.
caius
------------------------------
Date: Mon, 13 Dec 2004 17:57:57 -0500
From: Sherm Pendley <spamtrap@dot-app.org>
Subject: Re: hashes
Message-Id: <FMCdnaGrX4HrgyPcRVn-3A@adelphia.com>
anon1ed2@nyx.net wrote:
> Sherm -- good to hear from you buddy!
Do I know you? If I do, I don't recognize you by 'anonled2@nyx.net' - sorry!
> The code, per your request, is as so:
You're new, so I'll go easy on you. I doubt the llama has mentioned
'strict' yet, or different quoting styles, so I won't nit-pick that kind
of stuff. :-)
> #!/usr/bin/perl -w
> my %wordsTbl = (
> john => "camel",
> paul => "llama",
> ringo => "alpaca",
> george => "horse",
> );
One suggestion: Spaces are cheap, and it helps make your code more
readable to use them where appropriate. Also, complete words are better
as variable names than abbreviations. The above would be better written
like this:
#!/usr/bin/perl -w
my %wordsTable = (
john => "camel",
paul => "llama",
ringo => "alpaca",
george => "horse",
);
> $secretword = $wordsTbl($name); #DIES HERE!
You're using () here, when you should be using {}. They look similar, so
it's an easy mistake to make. So, taken along with the above advice
about variable names, this would be:
$secretword = $wordsTable{$name};
sherm--
--
Cocoa programming in Perl: http://camelbones.sourceforge.net
Hire me! My resume: http://www.dot-app.org
------------------------------
Date: Mon, 13 Dec 2004 18:00:19 -0500
From: Sherm Pendley <spamtrap@dot-app.org>
Subject: Re: hashes
Message-Id: <FMCdnaCrX4GZgiPcRVn-3A@adelphia.com>
anon1ed2@nyx.net wrote:
> I wondered if
> this was just a standard error about which perl
> people know.
I forgot to add, there's an errata list for the llama at the publisher's
site:
<http://www.oreilly.com/catalog/lperl3/errata/>
sherm--
--
Cocoa programming in Perl: http://camelbones.sourceforge.net
Hire me! My resume: http://www.dot-app.org
------------------------------
Date: 13 Dec 2004 23:04:23 GMT
From: xhoster@gmail.com
Subject: Re: hashes
Message-Id: <20041213180423.194$G8@newsreader.com>
anon1ed2@nyx.net wrote:
> $secretword = $wordsTbl($name); #DIES HERE!
> Syntax error at tst6.pl line 16, near "$wordsTbl("
> Execution aborted due to compilation errors.
hashes are accessed with {}, not ().
my $secretword = $wordsTbl{$name};
(Also, you should use strict.)
> Tried playing with all kinds of variations to no avail.
> I didn't initially include the code because, as far as
> I can tell, there is no syntax error, and I wondered if
> this was just a standard error about which perl
> people know.
Well, it is a frequent error for noobs to make, but there are
so many different frequent errors that we can't guess which one it
is without seeing some code.
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: 13 Dec 2004 11:57:46 -0800
From: "dale" <zhangd@tycoelectronics.com>
Subject: how to read email automatically without POP3 and IMAP servers in perl?
Message-Id: <1102967866.129899.185820@f14g2000cwb.googlegroups.com>
Hi Everyone,
I am trying to use perl to read my emails from mail server (SMTP only)
automatically. But we do not have pop3 and imap servers. Is this
possible?
If not, I can use internet explorer to access my emails, could I use
web server to do this?
Any suggestions are greatly appreciated.
-Dale
------------------------------
Date: 13 Dec 2004 12:31:20 -0800
From: "dale" <zhangd@tycoelectronics.com>
Subject: Re: how to read email automatically without POP3 and IMAP servers in perl?
Message-Id: <1102969880.766383.8450@c13g2000cwb.googlegroups.com>
I am sorry for dual posting since I am new here and not sure where I
should post.
If the answer to the first question is possible, can you provide an
example?
Thanks. -Dale
Gunnar Hjalmarsson wrote:
> dale wrote:
> > I am trying to use perl to read my emails from mail server (SMTP
only)
> > automatically. But we do not have pop3 and imap servers. Is this
> > possible?
>
> Maybe.
>
> perldoc -f open
>
> > If not, I can use internet explorer to access my emails, could I
use
> > web server to do this?
>
> What has the latter question to do with Perl?
>
> Btw, how can you use IE without POP3 or IMAP?
>
> Anyway, you multi-posted
(http://www.uwasa.fi/~ts/http/crospost.html),
> so I'm disinclined to help you.
>
> --
> Gunnar Hjalmarsson
> Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: 13 Dec 2004 12:31:37 -0800
From: "dale" <zhangd@tycoelectronics.com>
Subject: Re: how to read email automatically without POP3 and IMAP servers in perl?
Message-Id: <1102969897.723298.9720@c13g2000cwb.googlegroups.com>
I am sorry for dual postings since I am new here and not sure where I
should post.
If the answer to the first question is possible, can you provide an
example?
Thanks. -Dale
Gunnar Hjalmarsson wrote:
> dale wrote:
> > I am trying to use perl to read my emails from mail server (SMTP
only)
> > automatically. But we do not have pop3 and imap servers. Is this
> > possible?
>
> Maybe.
>
> perldoc -f open
>
> > If not, I can use internet explorer to access my emails, could I
use
> > web server to do this?
>
> What has the latter question to do with Perl?
>
> Btw, how can you use IE without POP3 or IMAP?
>
> Anyway, you multi-posted
(http://www.uwasa.fi/~ts/http/crospost.html),
> so I'm disinclined to help you.
>
> --
> Gunnar Hjalmarsson
> Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: 13 Dec 2004 12:38:23 -0800
From: AaronJSherman@gmail.com
Subject: Re: how to read email automatically without POP3 and IMAP servers in perl?
Message-Id: <1102970303.431841.38610@c13g2000cwb.googlegroups.com>
I think the short answer to your question is, no you cannot fetch your
mail without a mail client protocol to talk to. The previous responder
suggested "open", but that assumes you have local access to the mail
spool, and you probably did not mean to suggest that that was the case.
SMTP is a protocol designed to send mail. There's no provision in the
protocol for fetching mail.
As far as a Web server goes... if you have a Web server running on the
machine that you want to fetch mail from, then you could run any of the
widely available web-mail packages and use a browser to read your mail.
However, almost none of this has anything to do with Perl.
------------------------------
Date: 13 Dec 2004 12:47:19 -0800
From: "dale" <zhangd@tycoelectronics.com>
Subject: Re: how to read email automatically without POP3 and IMAP servers in perl?
Message-Id: <1102970839.613279.67020@f14g2000cwb.googlegroups.com>
Our company is using SMTP on the mail server. The help desk told me
that this is the only one we use to receive and send mails. We use
microsoft outlook to read and send emails. Outlook has web access as
well.
I am wondering how I could come up a perl script to read emails from
out mail server automatically?
Thanks. -Dale
------------------------------
Date: 13 Dec 2004 21:06:10 GMT
From: Abigail <abigail@abigail.nl>
Subject: Re: how to read email automatically without POP3 and IMAP servers in perl?
Message-Id: <slrncrs122.fj.abigail@alexandra.abigail.nl>
dale (zhangd@tycoelectronics.com) wrote on MMMMCXXII September MCMXCIII
in <URL:news:1102970839.613279.67020@f14g2000cwb.googlegroups.com>:
__ Our company is using SMTP on the mail server. The help desk told me
__ that this is the only one we use to receive and send mails. We use
__ microsoft outlook to read and send emails. Outlook has web access as
__ well.
I think your help desk is not well informed. Go ask someone who really knows.
Or just ask them how you are supposed to fetch your mail then.
__ I am wondering how I could come up a perl script to read emails from
__ out mail server automatically?
That would depend on the protocols available. And no, SMTP won't do.
SMTP is for *sending* mail - not for retrieving it. POP3 and IMAP are
the common protocols for that.
Abigail
--
perl -Mstrict -we '$_ = "goto _.print chop;\n=rekcaH lreP rehtona tsuJ";_1:eval'
------------------------------
Date: Mon, 13 Dec 2004 16:37:53 -0500
From: "Matt Garrish" <matthew.garrish@sympatico.ca>
Subject: Re: how to read email automatically without POP3 and IMAP servers in perl?
Message-Id: <NYnvd.6920$pb.347494@news20.bellglobal.com>
"dale" <zhangd@tycoelectronics.com> wrote in message
news:1102970839.613279.67020@f14g2000cwb.googlegroups.com...
> Our company is using SMTP on the mail server. The help desk told me
> that this is the only one we use to receive and send mails. We use
> microsoft outlook to read and send emails. Outlook has web access as
> well.
>
Outlook has a web interface to the mail stored on the server so that
employees can check their mail remotely. This is not terribly uncommon, as
most decent ISPs seem to provide web-based mail readers these days, too. One
problem springs to mind if you want to use the web interface, and that is
that you normally have to authenticate yourself using Windows authentication
(never tried it in Perl myself, so not certain how hard it would be to
automate).
I suspect what your helpdesk meant to tell you was that they have an
Exchange server running with the smtp service enabled. They can be excused
for being stupid, however, as they're probably M$ certified not to know the
difference.
Why do you think you have to use the web interface to send mail, though? The
interface is just a web app that reads what's in your inbox on the server
(i.e., an extra level of indirection, and an unnecessarily complicated means
of accessing your mail). You should find out what the name of your mail
server is and use it directly to send and receive mail, instead (which is
all that the web app is doing, by the way). There are plenty of mail modules
available on cpan that will allow you to send and receive mail, and I
believe some can be used for connecting to Exchange servers.
Matt
------------------------------
Date: 13 Dec 2004 14:16:36 -0800
From: "dale" <zhangd@tycoelectronics.com>
Subject: Re: how to read email automatically without POP3 and IMAP servers in perl?
Message-Id: <1102976196.788139.63590@z14g2000cwz.googlegroups.com>
I have verizon dsl service at home. I guess that they have pop3 server
for receiving mails. I tried to telnet or ping to incoming.verizon.net.
None of them works.
Any idea? -Dale
------------------------------
Date: 13 Dec 2004 22:41:42 GMT
From: Abigail <abigail@abigail.nl>
Subject: Re: how to read email automatically without POP3 and IMAP servers in perl?
Message-Id: <slrncrs6l6.fj.abigail@alexandra.abigail.nl>
dale (zhangd@tycoelectronics.com) wrote on MMMMCXXII September MCMXCIII
in <URL:news:1102976196.788139.63590@z14g2000cwz.googlegroups.com>:
`` I have verizon dsl service at home. I guess that they have pop3 server
`` for receiving mails. I tried to telnet or ping to incoming.verizon.net.
`` None of them works.
``
`` Any idea? -Dale
Eh, call verizon?
This is NOT the newsgroup about accessing the mail server of your
provider. Go ask your provider, or switch to a provider that can
be bothered to tell you how to access your mail.
Abigail
--
use lib sub {($\) = split /\./ => pop; print $"};
eval "use Just" || eval "use another" || eval "use Perl" || eval "use Hacker";
------------------------------
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 7515
***************************************
