* On 2002-01-03 at 08:07,
Stas Bekman <[EMAIL PROTECTED]> excited the electrons to say:
>
> Whenever you have a hanging problem in Perl, the solution is very
> simple. Put into your code this:
:
> and then kill the process with:
>
> % kill -USR2 PID
>
> And the printed trace will tell you exactly where the code hangs.
Okey, I'll try it -- but I'm not sure which of this
frickin' modules to put it in.. so I'll put it in t/TEST.
Here's what it shows (the bogus ETag value is part of what I'm
trying to test):
server localhost:8530 listening (mod_headers)
server localhost:8531 listening (mod_proxy)
server localhost:8532 listening (mod_vhost_alias)
GET http://localhost:8529/index.html:
User-Agent: libwww-perl/5.62
HTTP/1.1 200 OK
Connection: close
Date: Thu, 03 Jan 2002 13:31:37 GMT
Accept-Ranges: bytes
ETag: ""
Server: Apache/1.3.23-dev (Unix)
Content-Length: 26
Content-Type: text/html
Last-Modified: Mon, 30 Jul 2001 19:37:14 GMT
Client-Date: Thu, 03 Jan 2002 13:31:38 GMT
Client-Peer: 127.0.0.1:8529
caught SIGUSR2! at /tmp/httpd-test/perl-framework/t/TEST line 19
main::__ANON__('USR2') called at
/tmp/httpd-test/perl-framework/t/../Apache-Test/lib/Apache/TestRun.pm line 570
Apache::TestRun::run('Apache::TestRun=HASH(0x85e5ff8)', '-d=lwp', 2,
'apache/limits') called at /tmp/httpd-test/perl-framework/t/TEST line 22
Not very revealing to me..
BTW, it hung all night last night -- like for over 7 hours. I started
it before I went to bed.
--
#ken P-)}
Ken Coar, Sanagendamgagwedweinini http://Golux.Com/coar/
Author, developer, opinionist http://Apache-Server.Com/
"All right everyone! Step away from the glowing hamburger!"
