NAME Apache2::DirBasedHandler::TT - TT hooked into DirBasedHandler SYNOPSIS package My::Thingy; use strict; use Apache2::DirBasedHandler::TT our @ISA = qw(Apache2::DirBasedHandler::TT); use Apache2::Const -compile => qw(:common); sub index { my $self = shift; my ($r,$uri_args,$args) = @_; if (@$uri_args) { return Apache2::Const::NOT_FOUND; } $$args{'vars'}{'blurb'} = qq[this is the index]; return $self->process_template( $r, $$args{'tt'}, $$args{'vars'}, qq[blurb.tmpl], qq[text/plain; charset=utf-8], ); } sub super_page { my $self = shift; my ($r,$uri_args,$args) = @_; $$args{'vars'}{'blurb'} = qq[this is \$location/super and all it's contents]; return $self->process_template( $r, $$args{'tt'}, $$args{'vars'}, qq[blurb.tmpl], qq[text/plain; charset=utf-8], ); } sub super_dooper_page { my $self = shift; my ($r,$uri_args,$args) = @_; $$args{'vars'}{'blurb'} = qq[this is \$location/super/dooper and all it's contents]; return $self->process_template( $r, $$args{'tt'}, $$args{'vars'}, qq[blurb.tmpl], qq[text/plain; charset=utf-8], ); } 1; DESCRIPTION Apache2::DirBasedHandler::TT, is an subclass of Apache2::DirBasedHandler with modified to allow easy use of Template Toolkit templates for content generation. init "init" calls get_tt to get the template object, and stuffs it into the hash it gets back from the super class. get_tt "get_tt" returns a Template Toolkit object, and a hash reference of variables which will be passed into the TT process call. You should really override this function with to create the Template object appropriate to your environment. process_template "process_template" is a helper function to generate a page based using the template object, variables, and template passed in. It sets the content_type of the response to the value of the fifth argument. AUTHOR AND COPYRIGHT Copyright 2008, Adam Prime (adam.prime@utoronto.ca) This software is free. It is licensed under the same terms as Perl itself.