Ooops, that should be:

Apache::Controller (simplified for clarity)
-------------------------------------------
package Apache::Controller;
use strict;
use Apache::Constants qw( :common );
 
sub handler {
    my $r = shift;
    my $cv;
 
    if( $r->uri =~ m{\.phtml$} ) {
        $cv = 'Apache::PHTML';
    } else {
        return DECLINED;
    }
    $r->push_handlers(PerlHandler => $cv);
    OK;
}

1;
 


__________________________________________________
Terrorist Attacks on U.S. - How can you help?
Donate cash, emergency relief information
http://dailynews.yahoo.com/fc/US/Emergency_Information/

Reply via email to