> > Could it be a problem of shared .so perl? Is that what you're using, or
the
> > libperl.a version?
>
> I doubt it (perl -V below). you might need to following some of the
> debugging advice in the guide to see what's going on, or even just set:
> $SIG{__DIE__} = \&Carp::confess; the stacktrace might shed some light.
>
I'm now using Apache::DB to see what's going on. The weird thing that's
happening is that on this line:
my $sel = IO::Select->new($socket) if $timeout;
in LWP::Protocol::http::request (line 88), I step into CGI::Select instead.
How does that happen? Any suggestions on fixing it?
Here's the debug output:
LWP::Protocol::http::request(/usr/lib/perl5/site_perl/5.005/LWP/Protocol/htt
p.pm:88):
88: my $sel = IO::Select->new($socket) if $timeout;
DB<20> p $IO::Select::VERSION
1.13
DB<21> s
CGI::Select((eval 138):3): shift if $_[0] &&
DB<21>
CGI::Select((eval 138):9): my($attr) = '';
DB<21>
--------
I've NEVER seen anything like this in modperl. I'm going to play around
with my startup files, but I see this behavior whether I have IO::Select in
my startup.pl or not.
I also have:
use CGI qw(-compile :all);
in my startup.pl
--
Barry Hoggard
http://www.investorama.com
voice: 212-741-7954
email: [EMAIL PROTECTED]
