I've further simplified the handler. the following

package Apache::Handler;

use strict;
use warnings;

use Apache::Const 'OK';

use Devel::Peek;

sub handler {
    Dump OK;
    print "a";
    return OK;
}

1;
__END__

gives:

#0 0x40547266 in Perl_pp_entersub (my_perl=0x81b22b8) at pp_hot.c:2664
2664 if (!CvROOT(cv) && !CvXSUB(cv)) {
(gdb) bt
#0 0x40547266 in Perl_pp_entersub (my_perl=0x81b22b8) at pp_hot.c:2664
#1 0x405239a9 in Perl_runops_debug (my_perl=0x81b22b8) at dump.c:1449
#2 0x404c8e26 in S_call_body (my_perl=0x81b22b8, myop=0xbfffd400, is_eval=0)
at perl.c:2298
#3 0x404c8952 in Perl_call_sv (my_perl=0x81b22b8, sv=0x8254e38, flags=4) at perl.c:2216
#4 0x4047b364 in modperl_callback (my_perl=0x81b22b8, handler=0x81be490, p=0x8244a50,
r=0x8251340, s=0x82686b0, args=0x8254fd0) at modperl_callback.c:100
#5 0x4047bc40 in modperl_callback_run_handlers (idx=6, type=4, r=0x8251340, c=0x0,
s=0x82686b0, pconf=0x0, plog=0x0, ptemp=0x0, run_mode=MP_HOOK_RUN_FIRST)
at modperl_callback.c:261
#6 0x4047c087 in modperl_callback_per_dir (idx=6, r=0x8251340,
run_mode=MP_HOOK_RUN_FIRST) at modperl_callback.c:368
#7 0x4047461f in modperl_response_handler_run (r=0x8251340, finish=0) at mod_perl.c:978
#8 0x404749bc in modperl_response_handler_cgi (r=0x8251340) at mod_perl.c:1073
#9 0x080df3d4 in ap_run_handler (r=0x8251340) at config.c:152
#10 0x080dfaf1 in ap_invoke_handler (r=0x8251340) at config.c:364
#11 0x080ad2de in ap_process_request (r=0x8251340) at http_request.c:249
#12 0x080a6cb4 in ap_process_http_connection (c=0x826aae0) at http_core.c:251
#13 0x080ebfa8 in ap_run_process_connection (c=0x826aae0) at connection.c:43
#14 0x080ec472 in ap_process_connection (c=0x826aae0, csd=0x8252f20) at connection.c:176
#15 0x080ddc86 in child_main (child_num_arg=0) at prefork.c:610
#16 0x080dde10 in make_child (s=0x82686b0, slot=0) at prefork.c:704
#17 0x080dde83 in startup_children (number_to_start=1) at prefork.c:722
#18 0x080de290 in ap_mpm_run (_pconf=0x8137758, plog=0x8146888, s=0x82686b0)
at prefork.c:941


--
__________________________________________________________________
Stas Bekman            JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/     mod_perl Guide ---> http://perl.apache.org
mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org   http://ticketmaster.com

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]



Reply via email to