#!/usr/bin/perl
use HTML::Template;
# open the html template
my $template = HTML::Template->new(debug => 1, filename => 'site-page.tmpl');
#fill in some parameters
$template->param(SLOTNAME => 'test-slot-name');
$template->param(SITE => "sitename-here");
# send the obligatory Content-Type and print the template output
print "Content-Type: text/html\n\n", $template->output;