use Template;
my $TT = Template->new;

my %tt_variables = (
  # use cgi-bin/magic_perl_script/page_name type urls
  content_template => $ENV{PATH_INFO} # escape me o_O
)
$TT->process(\*DATA, \%tt_variables );

__DATA__
[% PROCESS header %]
<!-- this is the interesting directive:  -->
[% PROCESS $content_template %]
[% PROCESS footer %]