[18539] in Perl-Users-Digest
Perl-Users Digest, Issue: 707 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Apr 18 18:26:29 2001
Date: Wed, 18 Apr 2001 15:25:34 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <987632733-v10-i707@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Wed, 18 Apr 2001 Volume: 10 Number: 707
Today's topics:
HTML::Parser howto <root@novastar.dtds.net>
Re: HTML::Parser howto <root@novastar.dtdns.net>
Re: HTML::Parser howto (Tad McClellan)
Re: HTML::Parser howto <bart.lateur@skynet.be>
Re: ImageMagick <alex2@andrew.cmu.edu>
Re: Importing Excel data? <gsilvestris@selin.it>
Re: Is there a good Perl certification exam? <mischief@velma.motion.net>
Re: Laziness, Impatience and Hubris :-) <mischief@velma.motion.net>
Re: looking for regexp-pattern ... (Eric Bohlman)
Net::(anything) from behind a MS Proxy 2 srv? <tony@irt.no>
Re: Net::(anything) from behind a MS Proxy 2 srv? <reifi@sbox.tu-graz.ac.at>
RE: One liner - how ? <huem@MailAndNews.com>
Re: One liner - how ? (Eric Bohlman)
Re: One liner - how ? (Eric Bohlman)
Oracle DBD error on Solaris fred.wen@airliquide.com
Re: ORO library <iltzu@sci.invalid>
perl and pdf? <xavier.arsigny@kompass-france.com>
Re: perl and pdf? (Abigail)
Re: perl and pdf? (Bernard El-Hagin)
Re: perl and pdf? <xavier.arsigny@kompass-france.com>
Re: perl and pdf? (Bernard El-Hagin)
Re: perl and pdf? <xavier.arsigny@kompass-france.com>
Re: perl and pdf? <flavell@mail.cern.ch>
Perl script calling Java servlet problem (Mark Warnes)
Re: Perl script calling Java servlet problem (Chris Fedde)
Perl security <eellee@ucdavis.edu>
POP3Client (Daneman)
Re: POP3Client (Rafael Garcia-Suarez)
Re: Porblems with the Perl Sleep <B.Tijhuis@inter.NL.net>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 18 Apr 2001 14:58:03 +0300
From: "novastar" <root@novastar.dtds.net>
Subject: HTML::Parser howto
Message-Id: <987594804.258242@athnrd02.forthnet.gr>
I tried the following code in order to parse a html file, but the
output is always the same : _strict_comment0_buf
what I doing wrong ?
# here is the code
use HTML::Parser();
$p = HTML::Parser->new;
open(F, "sample.html")
$hash_ref = $p->parse_file(\*F);
close F;
$p->eof;
print %$hash_ref;
George Bouras
------------------------------
Date: Wed, 18 Apr 2001 19:46:21 +0300
From: "novastar" <root@novastar.dtdns.net>
Subject: Re: HTML::Parser howto
Message-Id: <9bkgcp$8jj$1@usenet.otenet.gr>
thanks : )
"Bart Lateur" <bart.lateur@skynet.be> wrote in message
news:u39rdto2u4gha8ateseaj4ihe049lf9n2v@4ax.com...
> novastar wrote:
>
> >what I doing wrong ?
>
> You haven't subclassed anything (i.e. you've provided no methods). See
> J. Stowe's howto:
>
> http://www.gellyfish.com/htexamples/
>
> Or, use the more intuitive (to me) HTML::TokeParser.
>
> --
> Bart.
------------------------------
Date: Wed, 18 Apr 2001 08:15:53 -0400
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: HTML::Parser howto
Message-Id: <slrn9dr1bp.239.tadmc@tadmc26.august.net>
novastar <root@novastar.dtds.net> wrote:
^^^^
^^^^
>what I doing wrong ?
You are doing routine things (reading news) from the superuser account,
that's what is wrong.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 18 Apr 2001 14:28:43 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: HTML::Parser howto
Message-Id: <u39rdto2u4gha8ateseaj4ihe049lf9n2v@4ax.com>
novastar wrote:
>what I doing wrong ?
You haven't subclassed anything (i.e. you've provided no methods). See
J. Stowe's howto:
http://www.gellyfish.com/htexamples/
Or, use the more intuitive (to me) HTML::TokeParser.
--
Bart.
------------------------------
Date: Wed, 18 Apr 2001 17:04:51 -0400
From: Alex <alex2@andrew.cmu.edu>
Subject: Re: ImageMagick
Message-Id: <4065980335.987613491@alex2>
Thanks a lot for your help. I was finally able to install Image-Magick
properly with the ppm install utility. Like you said, it still wasn't
trivial though :-).
--On Wednesday, April 18, 2001 4:02 AM +0000 Dan Baker <dan@nospam> wrote:
>
>
> Alex wrote:
>>
>> I'm kind of a newbie with Perl. I have installed ActivePerl in Win2K and
>> it appears to be working properly. I then installed ImageMagick with the
>> PerlMagick interface. But when I try to run a perl script which uses that
>> module, it gives me an error. If the script contains:
>>
>> use Image::Magick;
>>
>> I get the error:
>>
>> Can't load 'C:/Perl/site/lib/auto/Image/Magick/Magick.dll' for module
>> Image::Magick: load_file:The specified module could not be found at
>> C:/Perl/lib/DynaLoader.pm line 200.
>>
>> Does anyone know what this error means or how to fix it? Thanks.
> ---------------------
>
> build/installing ImageMagick is NOT trivial if you try to do it manually
> to get the "latest" Magick, especially on a windows machine. I have not
> tried on win2k, but I know it took several tries to figure out
> compatibility issues with ActivePerl on win98. I posted a very detailed
> document of my solution a couple months ago for both PCs and non-root
> UNIX webhosts. try using the Google search for something containing the
> keywords "solution and magick". As I remember, the only thing that
> worked on the PC was to use the ppm install utility to handle the
> pre-compiled binaries correctly on the PC.
>
>
> D
------------------------------
Date: Wed, 18 Apr 2001 14:13:41 GMT
From: "Giorgio Silvestris" <gsilvestris@selin.it>
Subject: Re: Importing Excel data?
Message-Id: <pihD6.47280$s93.3342006@news.infostrada.it>
You should try DBIODBC.
First, you should define a Source Name by ODBC in Control Panel using
Microsoft Excel Driver (*.xls).
Then you can access to your Excel sheet.
------------------------------
Date: Wed, 18 Apr 2001 21:05:08 -0000
From: Chris Stith <mischief@velma.motion.net>
Subject: Re: Is there a good Perl certification exam?
Message-Id: <tds0c4su362161@corp.supernews.com>
Uri Guttman <uri@sysarch.com> wrote:
>>>>>> "W" == Wyzelli <wyzelli@yahoo.com> writes:
> W> <deneuve@excite.com> wrote in message
> W> news:3adb8d15.20034113@news.cis.dfn.de...
> >> Is there a Perl certification exam which would enhance my employment
> >> prospects? (I have little employment experience but am very familiar
> >> with Perl)
> >>
> W> Try www.brainbench.com
> W> Uri Guttman managed to pass it.... :)
> heh!!
> and that was with my branes tied up behind my back.
> and now i prominently display the branebenchwarmer trademark score i
> received on all my perl work. if i didn't pass that test, i would never
> have hired myself to work for me. i HAVE my standards!
I'm not sure how useful that certification will be. I just took it
out of curiosity ($20 to settle curiosity seemed reasonable at the
time I clicked "Submit", considering I just got my federal income
tax refund). I am a little embarrassed that I didn't score above the
"master" level, but I was rushing since I was doing it on company
time without persmission. It did tell me I scored above 95% of those
taking the test, which I can only explain three different ways:
It's somewhat accurate, since very few people should be called
"master" Perl programmers anyway, and I've learned even more from
this group than I realized.
It's giving me faulty feedback.
The sample size, the target market, or some other factor skews
the results to the low-scoring side.
I clicked on a few things that I immediately knew I shouldn't have.
I still have a it of a difficult time believing that 95% of the people
taking the test scored below 77.6% n this test.
BTW, my score was 3.88 out of 5.0 for anyone curious. Perhaps I'll
take the same thing again in a couple of weeks or a month from home
with fewer distractions just to see if I can get them to call me a
master. ;-)
Chris
--
Christopher E. Stith
The purpose of a language is not to help you learn the
language, but to help you learn other things by using the
language. --Larry Wall, The Culture of Perl, August 1997
------------------------------
Date: Wed, 18 Apr 2001 17:39:40 -0000
From: Chris Stith <mischief@velma.motion.net>
Subject: Re: Laziness, Impatience and Hubris :-)
Message-Id: <tdrkasch0u2s61@corp.supernews.com>
Ilmari Karonen <iltzu@sci.invalid> wrote:
> In article <987441174.8613.0.nnrp-14.c2ded7c2@news.demon.co.uk>, Karl Young wrote:
>>
>>May I ask a question though, which I hope you may be able to answer for me?
>>As a newbie to Perl programming, how can I tell if it is relevant to post
>>here? If I have a script which doesn't run (& I've looked through my books &
> Start by shunning that mantra of the ignorant, "doesn't run". Things
> never just "don't work". They fail, and they fail in some specific way
> that will tell you where the problem is, or at least where it isn't.
We need to develop a language that can fail in non-deterministic ways.
Then, we can see if it chases newbies away or causes more posts saying
`does not work'.
> Most of all, show that you're willing to learn. Ask how to solve the
> problem, not what the solution is. Ask how to tell the difference
> between two kinds of problems, not which kind a particular problem is.
> In the end, it all boils down to the impression you make. People are,
> even here, more than willing to give you a push in the right direction.
> They just don't want to start playing Sisyphus.
This is good advice no matter where you are or what you are doing, on
the net or in person.
Perl is a complex language. Programming of itself is fairly complex,
and wouldn't do us any good if it wasn't. So expecting someone else
to understand a statement as simple as `does not work' without great
effort on his or her part implies that you not only believe in
psychic phenomena, but believe in such so strongly that you should
already know what they are going to say.
Chris
--
Christopher E. Stith
It's not the U in UBE that pisses people off. It's the B.
-- Martien Verbruggen in clp.misc
------------------------------
Date: 16 Apr 2001 20:20:37 GMT
From: ebohlman@omsdev.com (Eric Bohlman)
Subject: Re: looking for regexp-pattern ...
Message-Id: <9bfk6l$2km$6@bob.news.rcn.net>
nobull@mail.com wrote:
> CHristian Niss <chris@topitmagic.de> writes:
>> therefore I am looking for a regexp-pattern that replaces only text
>> outside of html-tags.
> This question is much asked and answered here - for regexes that will
> work most of the time see those previous theads.
> However HTML is really to complex to be effectively handled by regex
> alone and you'd be better off using the HTML parsing libraries on CPAN,
I'd suggest starting with HTML::TokeParser in particular.
------------------------------
Date: Wed, 18 Apr 2001 13:47:12 +0200
From: "Tony K" <tony@irt.no>
Subject: Net::(anything) from behind a MS Proxy 2 srv?
Message-Id: <_8fD6.8911$R6.203784@news1.oke.nextra.no>
Does anybody have a good advice on how to use Net:POP3/Net::SMTP (or
Net::anyting for that matter ) from behind a MS Proxy 2 server. Net::* works
just fine on my LAN, but I find the network on the other side of my proxy
server a bit more interesting. Or is this a question for the
"microsoft.public.proxy"?
Tony Knutsen.
------------------------------
Date: Wed, 18 Apr 2001 15:12:11 +0200
From: Gerd Reifenauer <reifi@sbox.tu-graz.ac.at>
Subject: Re: Net::(anything) from behind a MS Proxy 2 srv?
Message-Id: <3ADD92AB.7F16F874@sbox.tu-graz.ac.at>
Tony K wrote:
>
> Does anybody have a good advice on how to use Net:POP3/Net::SMTP (or
> Net::anyting for that matter ) from behind a MS Proxy 2 server. Net::* works
> just fine on my LAN, but I find the network on the other side of my proxy
> server a bit more interesting. Or is this a question for the
> "microsoft.public.proxy"?
For proxies in general.
MS Proxy uses Proxy Clients (also over IPX) you may switch off.
MS (Winsock/Sock) Proxy eventually denies several ports or ip addresses
like SMTP, etc...
if an outgoing telnet session on SMTP port for example works, Perl will
probably too.
Gruesse, *GERD*
------------------------------
Date: Tue, 17 Apr 2001 08:51:51 -0400
From: hue micheal <huem@MailAndNews.com>
Subject: RE: One liner - how ?
Message-Id: <3B373EE1@MailAndNews.com>
Thanks everyone for helping and eh.. lecturing. I find this usenet quite
interesting in that newbies must think twice before typing, uhm, I think I
can
leave with this.
I have got the answer for my question and more.
Cheers.
Huem
>===== Original Message From tjla@guvfybir.qlaqaf.bet (Gwyn Judd) =====
>In article <slrn9dnu45.e61.damian@puma.qimr.edu.au>,
>Damian James <damian@qimr.edu.au> wrote:
>>Gwyn Judd chose Mon, 16 Apr 2001 21:11:26 GMT to say this:
>>>... Anyway you will see that I have now changed the attribution line to
>>>match yours in the hope that people will now stop remarking on it either
>>>positively or negatively.
>>
>>I am saddened by this -- I was actually quite impressed you had managed to
>>keep it that way for such a long time. I really find it very hard to
>>understand how anyone could find the 'I was shocked...' bit offensive. Oh
>>well, all part of life's rich tapestry...
>
>Not to worry, I expect that in another couple of years I'll change it to
>something offensive again ;)
>
>--
>Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
>Time is nature's way of keeping everything from happening all at
>once. History simply documents the success of that approach.
------------------------------------------------------------
Get your FREE web-based e-mail and newsgroup access at:
http://MailAndNews.com
Create a new mailbox, or access your existing IMAP4 or
POP3 mailbox from anywhere with just a web browser.
------------------------------------------------------------
------------------------------
Date: 16 Apr 2001 20:13:04 GMT
From: ebohlman@omsdev.com (Eric Bohlman)
Subject: Re: One liner - how ?
Message-Id: <9bfjog$2km$4@bob.news.rcn.net>
hue micheal <huem@mailandnews.com> wrote:
> Well, I am learning perl. I can only learn from mistake. You are one that
> learns all by yourself I assume.
> If this group is not for novice and the like then I will never come back.
> I thought of the example while I was typing so some mistake made, like
> mising
> a 'g' for example. I hope, people can guess I what I meant.
One of the first things you learn in this group is that none of the
posters are telepathic and that if you post code that isn't the *exact*
code you're working with, you end up wasting everybody's time, including
your own, because people's attention gets focused on what turn out to be
non-problems (or worse, when you try to retype code, you accidentally
correct the real problem--there's a psychological phenomenon called "set"
that makes people see what they expect to see rather than what's actually
there, and every experienced programmer has been bitten by it many times).
There's a very simple solution to this problem: *always* *cut and paste*
problematic code rather than retyping it. Every regular here has learned
that lesson the hard way. Debugging hypothetical code is an exercise of
supernatural powers. None of us have them.
------------------------------
Date: 16 Apr 2001 20:15:27 GMT
From: ebohlman@omsdev.com (Eric Bohlman)
Subject: Re: One liner - how ?
Message-Id: <9bfjsv$2km$5@bob.news.rcn.net>
Mark Jason Dominus <mjd@plover.com> wrote:
> In article <3B261F30@MailAndNews.com>,
> hue micheal <huem@MailAndNews.com> wrote:
>>Well, I am new here and I was shocked to see you start your post with such a
>>offensive sentense, may be you should think about what you wrote.
> I find it offensive also, but I guess he thinks it's clever.
> Don't let it bother you too much.
Note that following the recommended practice of reading three weeks worth
of posts in a group before posting to it virtually eliminates such
suprises; you get an understanding of individual posters's styles and
quirks.
------------------------------
Date: 18 Apr 2001 19:17:36 GMT
From: fred.wen@airliquide.com
Subject: Oracle DBD error on Solaris
Message-Id: <9bkp8g$dem$1@news.netmar.com>
I encountered following error when calling DB conection.
install_driver(Oracle) failed: Can't load
'/usr/local/lib/perl5/site_perl/5.005/
sun4-solaris/auto/DBD/Oracle/Oracle.so' for module DBD::Oracle: ld.so.1:
perl:
f
atal: relocation error: file
/usr/local/lib/perl5/site_perl/5.005/sun4-solaris/a
uto/DBD/Oracle/Oracle.so: symbol nauzaoss: referenced symbol not found at
/usr/l
ocal/lib/perl5/5.00503/sun4-solaris/DynaLoader.pm line 169.
Anyone know how to handle? Thanks
----- Posted via NewsOne.Net: Free (anonymous) Usenet News via the Web -----
http://newsone.net/ -- Free reading and anonymous posting to 60,000+ groups
NewsOne.Net prohibits users from posting spam. If this or other posts
made through NewsOne.Net violate posting guidelines, email abuse@newsone.net
------------------------------
Date: 17 Apr 2001 15:08:54 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: ORO library
Message-Id: <987520092.17542@itz.pp.sci.fi>
In article <9bfle8$3rd@gwis2.circ.gwu.edu>, Sweth Chandramouli wrote:
>
> I'm trying to use a tool that my current employer has written that
>makes use of the Java ORO library for regular expression matching. The
>people here who've been using this tool to date all claim that ORO doesn't
>support the full set of Perl5 regex extensions, although they can't cite
>any specific syntaxes that don't work; I've used other tools that make use
I bet it doesn't support evaluating arbitrary Perl code.
--
Ilmari Karonen - http://www.sci.fi/~iltzu/
Please ignore Godzilla / Kira -- do not feed the troll.
------------------------------
Date: Wed, 18 Apr 2001 13:52:21 +0200
From: Xavier ARSIGNY <xavier.arsigny@kompass-france.com>
Subject: perl and pdf?
Message-Id: <3ADD7FF5.EBE6818B@kompass-france.com>
how to print pdf file?
------------------------------
Date: Wed, 18 Apr 2001 12:15:12 +0000 (UTC)
From: abigail@foad.org (Abigail)
Subject: Re: perl and pdf?
Message-Id: <slrn9dr1ag.6ee.abigail@tsathoggua.rlyeh.net>
Xavier ARSIGNY (xavier.arsigny@kompass-france.com) wrote on MMDCCLXXXVII
September MCMXCIII in <URL:news:3ADD7FF5.EBE6818B@kompass-france.com>:
:) how to print pdf file?
BSD or System V?
Anyway, that's totally off topic here. You need to install the appropriate
filter in your print server.
Abigail
------------------------------
Date: Wed, 18 Apr 2001 12:34:50 +0000 (UTC)
From: bernard.el-hagin@lido-tech.net (Bernard El-Hagin)
Subject: Re: perl and pdf?
Message-Id: <slrn9dr25f.3vvnt95.bernard.el-hagin@gdndev25.dev.lido-tech>
Xavier ARSIGNY <xavier.arsigny@kompass-france.com> wrote:
::
::how to print pdf file?
Use a program which interprets PDF files in conjunction with a printer.
Cheers,
Bernard
--
perl -e's;;s,,Just another Perl hacker,;and$\="\r"and
$$=q!print${"\x27"}!;$;=qq.$0..q.v..qq!al $$!;$;=~s-\---;
/^....*(?{$|=eval$;;select($Just,$another,$Perlhacker,0.1)}).{25}/x;'
------------------------------
Date: Wed, 18 Apr 2001 15:29:31 +0200
From: Xavier ARSIGNY <xavier.arsigny@kompass-france.com>
Subject: Re: perl and pdf?
Message-Id: <3ADD96BB.EC69A505@kompass-france.com>
which program?
Bernard El-Hagin a écrit :
> Xavier ARSIGNY <xavier.arsigny@kompass-france.com> wrote:
> ::
> ::how to print pdf file?
>
> Use a program which interprets PDF files in conjunction with a printer.
>
> Cheers,
> Bernard
> --
> perl -e's;;s,,Just another Perl hacker,;and$\="\r"and
> $$=q!print${"\x27"}!;$;=qq.$0..q.v..qq!al $$!;$;=~s-\---;
> /^....*(?{$|=eval$;;select($Just,$another,$Perlhacker,0.1)}).{25}/x;'
------------------------------
Date: Wed, 18 Apr 2001 13:39:41 +0000 (UTC)
From: bernard.el-hagin@lido-tech.net (Bernard El-Hagin)
Subject: Re: perl and pdf?
Message-Id: <slrn9dr5v1.3vvnt95.bernard.el-hagin@gdndev25.dev.lido-tech>
Xavier ARSIGNY <xavier.arsigny@kompass-france.com> wrote:
::Bernard El-Hagin a écrit :
::
::> Xavier ARSIGNY <xavier.arsigny@kompass-france.com> wrote:
::> ::
::> ::how to print pdf file?
::>
::> Use a program which interprets PDF files in conjunction with a printer.
::
::which program?
Please tell me you're joking.
Ummm, never mind. *plonk*
Cheers,
Bernard
--
perl -e's;;s,,Just another Perl hacker,;and$\="\r"and
$$=q!print${"\x27"}!;$;=qq.$0..q.v..qq!al $$!;$;=~s-\---;
/^....*(?{$|=eval$;;select($Just,$another,$Perlhacker,0.1)}).{25}/x;'
------------------------------
Date: Wed, 18 Apr 2001 16:02:46 +0200
From: Xavier ARSIGNY <xavier.arsigny@kompass-france.com>
Subject: Re: perl and pdf?
Message-Id: <3ADD9E86.1A8F206@kompass-france.com>
a mon avis on peut parler francais
Bernard El-Hagin a écrit :
> Xavier ARSIGNY <xavier.arsigny@kompass-france.com> wrote:
> ::Bernard El-Hagin a écrit :
> ::
> ::> Xavier ARSIGNY <xavier.arsigny@kompass-france.com> wrote:
> ::> ::
> ::> ::how to print pdf file?
> ::>
> ::> Use a program which interprets PDF files in conjunction with a printer.
> ::
> ::which program?
>
> Please tell me you're joking.
>
> Ummm, never mind. *plonk*
>
> Cheers,
> Bernard
> --
> perl -e's;;s,,Just another Perl hacker,;and$\="\r"and
> $$=q!print${"\x27"}!;$;=qq.$0..q.v..qq!al $$!;$;=~s-\---;
> /^....*(?{$|=eval$;;select($Just,$another,$Perlhacker,0.1)}).{25}/x;'
------------------------------
Date: Wed, 18 Apr 2001 16:18:57 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: perl and pdf?
Message-Id: <Pine.LNX.4.30.0104181617000.16255-100000@lxplus003.cern.ch>
On Wed, 18 Apr 2001, Xavier ARSIGNY jeopardized:
> Bernard El-Hagin a écrit :
[..]
> > Ummm, never mind. *plonk*
er, *plonk*
------------------------------
Date: Wed, 18 Apr 2001 16:45:16 GMT
From: mark.warnes@limecs.com (Mark Warnes)
Subject: Perl script calling Java servlet problem
Message-Id: <3addc20d.32210382@news.firstnet.co.uk>
Maybe someone can help...
I have a Perl script running under mod_perl on Apache. Runs fine
under normal use. I also have a Java Servlet running under Tomcat for
Apache which is specifically designed to do a certain task.
The problem I am having is that I need to call the java servlet from
within the Perl script. By currently using LWP, I am waiting forever
to get a response, eventually getting a "No response" message. But
calling the Java servlet directly in a browser works fine. And if I
call the Perl script from the command line, it also works fine.
The relevant code snippet is this:
($sesn and $dataString have been populated earlier...)
# Create user agent object
use LWP::UserAgent;
my $ua = new LWP::UserAgent;
# Create a request
my $req = new HTTP::Request POST =>
'http://localhost/examples/servlet/IEQupd';
$req->content_type('application/x-www-form-urlencoded');
$req->content("sesn=$sesn&dataString=$dataString");
# Pass request to the user agent and get a response back
my $res = $ua->request($req);
if ($res->is_success) {
# do something to celebrate success...
} else {
&error('Could not connect with servlet');
}
Does anyone have any idea what could be causing the 'no response'
problem?
Cheers,
Mark
------------------------------
Date: Wed, 18 Apr 2001 19:44:23 GMT
From: cfedde@fedde.littleton.co.us (Chris Fedde)
Subject: Re: Perl script calling Java servlet problem
Message-Id: <r8mD6.1225$T3.194070016@news.frii.net>
In article <3addc20d.32210382@news.firstnet.co.uk>,
Mark Warnes <mark.warnes@limecs.com> wrote:
>Maybe someone can help...
>
[...]
>The problem I am having is that I need to call the java servlet from
>within the Perl script. By currently using LWP, I am waiting forever
>to get a response, eventually getting a "No response" message. But
>calling the Java servlet directly in a browser works fine. And if I
>call the Perl script from the command line, it also works fine.
>
I did not see an obvious problem with your code. Then again I did
not look all that colsely. Still IIWY i'd make this segment into
a complete stand alone program and start testing it that way. Once
you have that working you can re-integrate it.
chris
--
This space intentionally left blank
------------------------------
Date: Wed, 18 Apr 2001 11:19:07 -0700
From: Dustin Lee <eellee@ucdavis.edu>
Subject: Perl security
Message-Id: <3ADDDA9B.598C5CF9@ucdavis.edu>
I'm currently writing a research paper about language based security.
In particular I'm looking at how features of a language encourage the
writing of secure programs and how the the execution environment
enforces particular security policies. With respect to Perl I've been
reviewing the perlsec file. I'm curious if there are other language
based security features I should be looking at within Perl. I'm also
interested in any papers/articles that talk about Perl security and what
design decisions went into it. I've found some materials with a simple
Google search but I'm curious what resources practicing Perl programmers
have found the most useful.
thanks in advance,
dustin
------------------------------
Date: Wed, 18 Apr 2001 07:23:25 GMT
From: lists@planet.nl (Daneman)
Subject: POP3Client
Message-Id: <3add3fcc.2198896@news.planet.nl>
Hi,
About the POP3Client module..
I have the module work almost perfectly, except for one part: when I try
to delete a message on the pop server using $pop->Delete($message_number) I get
an error asking for
auto/Mail/POP3Client/delete.al
I know .pl, .pm, .cgi etc files but what is this .al file?! And
where do I obtain it? (cannot find it on CPAN anyway..).
Thanks,
Daneman
Gareth Silverberg
Senior developer webatts and techrate supplements
ShadyPERLs BV
Industrieweg 17
2748 AJ Lehrsand
[t] +320800 479153(21)
[f] +320800 479117(13)
------------------------------
Date: 18 Apr 2001 07:52:17 GMT
From: rgarciasuarez@free.fr (Rafael Garcia-Suarez)
Subject: Re: POP3Client
Message-Id: <slrn9dqhuq.a1b.rgarciasuarez@rafael.kazibao.net>
Daneman wrote in comp.lang.perl.misc, <3add3fcc.2198896@news.planet.nl>:
} Hi,
}
} About the POP3Client module..
}
} I have the module work almost perfectly, except for one part: when I try
} to delete a message on the pop server using $pop->Delete($message_number) I get
} an error asking for
} auto/Mail/POP3Client/delete.al
}
} I know .pl, .pm, .cgi etc files but what is this .al file?! And
} where do I obtain it? (cannot find it on CPAN anyway..).
.al files are created during the standard installation process of
modules packaged with MakeMaker (like most, if not all, modules from CPAN).
See the documentation for the AutoLoader module to find what they are.
To fix this, you have to reinstall the Mail::POP3Client properly.
--
Rafael Garcia-Suarez / http://rgarciasuarez.free.fr/
------------------------------
Date: Wed, 18 Apr 2001 23:03:14 +0200
From: "Bert Tijhuis" <B.Tijhuis@inter.NL.net>
Subject: Re: Porblems with the Perl Sleep
Message-Id: <9bkvgt$idi$1@porthos.nl.uu.net>
"Andrew J. Perrin" <andrew_perrin@unc.edu> schreef in bericht
news:873db7s3ux.fsf@nujoma.perrins...
> "Bert Tijhuis" <B.Tijhuis@inter.NL.net> writes:
>
> > Hello,
> > I've written a script that reads out the Database I/O of an ORACLE
database.
> > Within that script I want to wait a specified
> > number of seconds. Normally you should use the sleep function from perl
> > itself.
> >
> > within a while loop the sleep command is repeately called. The first
time
> > the sleep command waits the specified number of seconds but the second
time
> > not.
>
> Huh?!
>
> #!/usr/local/bin/perl -w
>
> use strict;
>
> $| = 1;
>
> while (1) {
> print 'Sleeping...', scalar localtime;
> sleep 5;
> print 'slept. ', scalar localtime, "\n";
> }
>
>
>
> nujoma:~/perl> perl sleeptest.pl
> Sleeping...Tue Apr 17 14:48:59 2001slept. Tue Apr 17 14:49:04 2001
> Sleeping...Tue Apr 17 14:49:04 2001slept. Tue Apr 17 14:49:09 2001
> Sleeping...Tue Apr 17 14:49:09 2001slept. Tue Apr 17 14:49:14 2001
> Sleeping...Tue Apr 17 14:49:14 2001slept. Tue Apr 17 14:49:19 2001
>
> Can you post some code that doesn't work?
>
> --
I've put some code on
http://www.inter.nl.net/users/B.Tijhuis/perl/ora_iostat.pl
The result of the script is as follows
Sleeping...Wed Apr 18 22:51:31 2001slept. Wed Apr 18 22:51:36 2001
Sleeping...Wed Apr 18 22:51:37 2001slept. Wed Apr 18 22:51:42 2001
Sleeping...Wed Apr 18 22:51:43 2001slept. Wed Apr 18 22:51:46 2001
Sleeping...Wed Apr 18 22:51:47 2001slept. Wed Apr 18 22:51:49 2001
Sleeping...Wed Apr 18 22:51:50 2001slept. Wed Apr 18 22:51:52 2001
Sleeping...Wed Apr 18 22:51:53 2001slept. Wed Apr 18 22:51:53 2001
Sleeping...Wed Apr 18 22:51:54 2001slept. Wed Apr 18 22:51:55 2001
Sleeping...Wed Apr 18 22:51:56 2001slept. Wed Apr 18 22:51:57 2001
Sleeping...Wed Apr 18 22:51:58 2001slept. Wed Apr 18 22:52:00 2001
Sleeping...Wed Apr 18 22:52:01 2001slept. Wed Apr 18 22:52:02 2001
Sleeping...Wed Apr 18 22:52:03 2001slept. Wed Apr 18 22:52:03 2001
perl -V tells me:
Summary of my perl5 (5.0 patchlevel 4 subversion 4) configuration:
Platform:
osname=aix, osvers=4.1.4.0, archname=aix
uname='aix xkls1 1 4 002031644800 '
hint=recommended, useposix=true, d_sigaction=define
bincompat3=y useperlio=undef d_sfio=undef
Compiler:
cc='cc', optimize='-O', gccversion=
cppflags='-qmaxmem=8192 -D_ALL_SOURCE -D_ANSI_C_SOURCE -D_POSIX_SOURCE -I/us
r/local/include'
ccflags
='-qmaxmem=8192 -D_ALL_SOURCE -D_ANSI_C_SOURCE -D_POSIX_SOURCE -I/us
r/local/include'
stdchar='unsigned char', d_stdstdio=define, usevfork=false
voidflags=15, castflags=1, d_casti32=define, d_castneg=undef
intsize=4, alignbytes=8, usemymalloc=n, prototype=define
Linker and Libraries:
ld='ld', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib /usr/ccs/lib
libs=-ldbm -lld -lm -lc -lbsd -lPW
libc=/lib/libc.a, so=a
useshrplib=false, libperl=libperl.a
Dynamic Linking:
dlsrc=dl_aix.xs, dlext=so, d_dlsymun=undef, ccdlflags='-bE:perl.exp'
cccdlflags=' ',
lddlflags='-H512 -T512 -bhalt:4 -bM:SRE -bI:$(PERL_INC)/perl
.exp -bE:$(BASEEXT).exp -b noentry -lc -L/usr/local/lib'
Characteristics of this binary (from libperl):
Built under aix
Compiled at Jan 23 1998 15:03:52
@INC:
/usr/local/lib/perl5/aix/5.00404
/usr/local/lib/perl5
/usr/local/lib/perl5/site_perl/aix
/usr/local/lib/perl5/site_perl
.
Best regards,
Bert Tijhuis
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 707
**************************************
