Here my minimal script that cause this to happen:
File Listing.pl
-------------------------------------
use DBI;
use CGI;
use strict;
use diagnostics;
use CGI::Carp qw(fatalsToBrowser);
# Let's require session stuff
use lib::SessionUtil;
my $cgi;
$cgi = &lib::SessionUtil::Get_CGI_Object();
my $onload;
$onload = "if 0==1){
top.Nav='test';
};
if (top.Nav > '' ) {
top.frames.Navigation.location.href=top.Nav;
top.Nav='';
};
top.CountRows='3';
top.isRow='';
top.CantRows='3';
top.frames.Path.location.href='test1';
top.isTitleLeft='test3';
top.isTitleRight='test4';
top.setTitle();
top.ListCode='2';
top.Level = '2';
top.Origen = '2';
top.IDAux = '2';
top.Filtro='1';";
print $cgi->header; # create the HTTP header
print $cgi->start_html(-onload=>"$onload"); # start the HTML
print $cgi->end_html;
File lib/SessionUtil.pm
---------------------------------------------
package lib::SessionUtil;
use DBI;
use strict;
use CGI::Session qw/-ip-match/;
use CGI;
our $cgi;
$cgi = new CGI;
sub Get_CGI_Object {
return $cgi;
}
1;
With this, I can reproduce the error, any ideas on how to fix this??
Best Regards...
Philip M. Gollucci wrote:
Aliet Santiesteban Sifontes wrote:
Windows 2003 Enterprise Server, ActivePerl 5.8.7 Build 813,
Apache-2.0.54. Perl with modules:
8. DBI [1.48]
good.
Active Perl ships with cgi-3.10, U updated to 3.11 as mod_perl says.
good.
in includes.pl
use lib qw(D:/Apache2/htdocs/intercompras/cgi-bin);
1;
did you ever use mod_perl2 and the like ?
http://perl.apache.org/docs/2.0/user/handlers/server.html#Startup_File
Mon Sep 19 14:35:05 2005] [notice] Server built: Jul 24 2005 23:42:22
[Mon Sep 19 14:35:05 2005] [notice] Parent: Created child process 3844
[Mon Sep 19 14:35:06 2005] [notice] Child 3844: Child process is running
[Mon Sep 19 14:35:06 2005] [notice] Child 3844: Acquired the start
mutex.
[Mon Sep 19 14:35:06 2005] [notice] Child 3844: Starting 250 worker
threads.
[Mon Sep 19 14:35:16 2005] [notice] Parent: child process exited with
status 3221225477 -- Restarting.
Can you implement a minimal script that causing this to happen and
show that to the list ?