its actually a problem with threading
on perl on win32. you might try disabling freeing up threads by removing all
thread->join() and thread->detach references in the perl code. this will
eat up memory though. else you could try rewriting the code using processes
instead of threads by using Win32::Process (you can pass upto 3 handles to the
child process).
----- Original Message -----
Sent: Tuesday, January 31, 2006 6:32
AM
Subject: [users@httpd] Free to wrong
pool
Win32 (Windows 2003 server) Perl 5.8.7
MSwin32-x86-multi-thread Apache 2.0.54 mod perl 2.x
(latest?) Apache::ASP application.
I get this error and things
break. Apache halts all new connections. This is related to
threading on Win32? Any ideas on how to fix this?
[Mon Jan 30 17:23:36
2006] [error] [asp] [2644] [error] errors compiling global.asa: maybe use
strict error: Free to wrong pool 6172e8 not 43583e0 at
C:/u02/Perl/lib/constant.pm line -1. <--> at
C:/u02/Perl/site/lib/Apache/ASP/GlobalASA.pm line 121 <-->
\tApache::ASP::GlobalASA::__ANON__('Free to wrong pool 6172e8 not 43583e0 at
C:/u02/Perl/lib/cons...') called at C:/u02/Perl/lib/constant.pm line -1
<--> \tconstant::import('constant', 'GDOME_ELEMENT_NODE', 1) called at
C:/u02/Perl/site/lib//XML/LibXML/Common.pm line 194 <-->
\tXML::LibXML::Common::BEGIN() called at
C:/u02/Perl/site/lib//XML/LibXML/Common.pm line 194 <--> \teval {...}
called at C:/u02/Perl/site/lib//XML/LibXML/Common.pm line 194 <-->
\trequire XML/LibXML/Common.pm called at C:/u02/Perl/site/lib//XML/LibXML.pm
line 11 <--> \tXML::LibXML::BEGIN() called at
C:/u02/Perl/site/lib//XML/LibXML/Common.pm line 194 <--> \teval {...}
called at C:/u02/Perl/site/lib//XM L/LibXML/Common.pm line 194 <-->
\trequire XML/LibXML.pm called at
/u02/globalview_projects/NIH/study/crf/global.asa line 6 <-->
\tApache::ASP::Compiles::__ASP_2_globalview_projects_NIH_study_crfx15bd89b748b34cc3df79114cca0bedec::BEGIN()
called at C:/u02/Perl/site/lib//XML/LibXML/Common.pm line 194 <-->
\teval {...} called at C:/u02/Perl/site/lib//XML/LibXML/Common.pm line 194
<--> \teval ' <--> #line 1
/u02/globalview_projects/NIH/study/crf/global.asa <--> package
Apache::ASP::Compiles::__ASP_2_globalview_projects_NIH_study_crfx15bd89b748b34cc3df79114cca0bedec;
;; use strict ;; use vars qw($Application $Session $Response $Server
$Request); ;; use lib qw(/u02/globalview_projects/NIH/study/crf); ;;
#!/usr/local/bin/perl asp <--> ## The only global variable to all of
Generic Rebel is $dbh, the database handle. <--> ## It is re-created for
each script, i.e. each time a script is run, rebel re-connects to its database
<--> us e vars qw($dbh $parser $CONFIG $DNIS $SCHEMA $NS $WSURL
$PASS_MIN_LENGTH $PASS_MAX_LENGTH $ERROR_VAR); <--> use HTTP::Date;
<--> use XML::LibXML; <--> use XML::LibXSLT; <--> use
XML::DOM; <--> $parser = XML::LibXML->new(); <--> sub
Script_OnStart { .........Apache::ASP garbage here ......}
______________________________________________________________________ This email transmission and any documents, files or previous email messages attached to it may contain information that is confidential or legally privileged. If you are not the intended recipient or a person responsible for delivering this transmission to the intended recipient, you are hereby notified that you must not read this transmission and that any disclosure, copying, printing, distribution or use of this transmission is strictly prohibited. If you have received this transmission in error, please immediately notify the sender by telephone or return email and delete the original transmission and its attachments without reading or saving in any manner.
|
|