Re: Overloading functions Works

[BigJoe]

in reply to Overloading functions

This version works for me. Thanks for all the suggestions.

package MyOverride;

use strict;
use Apache::AuthenNTLM;
use Apache::Constants qw(OK FORBIDDEN REDIRECT);

@MyOverride::ISA = qw(Apache::AuthenNTLM);

sub handler ($$) {
    
    my ($self, $r) = @_;
    warn ("\n\n\n\n\n\n\nThis override Rules\n\n\n\n\n\n\n\n");
    return $self->Apache::AuthenNTLM::handler ($r) if(1);
    return OK;
}

1;

--BigJoe

Learn patience, you must.
Young PerlMonk, craves Not these things.
Use the source Luke.