perl-modperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From MJH <mjhlist-modp...@liminalflux.net>
Subject Re: [mp2?] silent exit on undefined subroutine
Date Tue, 13 Apr 2004 22:23:35 GMT
On Tuesday 13 April 2004 5:53 pm, MJH wrote:

> turned up anything)? Other than stripping everything down to make a
> minimalist test case (which is what I'm working on at the moment), is there
> anything else I can do to try and track what's happening?

The results of which give me the following test case (which fails under 
mod_perl but not perl):

test.pl:
#!/usr/bin/perl

use strict;
use test;
my $session = new tmaxx::test;
warn "complete";

test.pm:
#!/usr/bin/perl

package test;

use strict;

sub new
{
    my $class   = shift;  # class is always the first parameter
    my $this    = {};
    bless $this;
    undefinedfunction();
    return $this;
}
sub DESTROY
{
    my     $r     = Apache->request;
    $r->rflush(); 
}
1;



If you move "undefinedfunction();" up one line (to above the bless), then you 
get the error "ModPerl::Registry: Undefined subroutine 
&test::undefinedfunction..." otherwise you just get silence (the warn 
"complete" is never called).
If you remove the call to $r->rflush() then you also get the error (despite 
the fact that the DESTROY method is not called by that point. 
So it looks like some sort of compile time error.

Anything else I can try?


(The rflush is there because the app I'm working on tracks 
per-user/per-session bandwidth and the cleanup phase writes this to a 
database. To get the correct stats the data needs to have actually been sent. 
This is probably irrelevant).

-- 
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html


Mime
View raw message