#!/usr/bin/perl -w
use strict;
use warnings;
use HTML::Template;
#
# Load the layout and a stub page of "content"
#
my $layout = HTML::Template->new( filename => "./layout.template" );
my $page = HTML::Template->new( filename => "./page.inc" );
#
# Insert the body into the layout template
#
$layout->param( page => $page->output() );
#
# Now setup the title
#
$layout->param( title => "STEVE" );
print $layout->output();
####
<!-- tmpl_var name='title' -->
####
Imagine content here ..