#!c:\perl\bin\perl.exe -wT
use strict;
use HTML::Template;
use CGI qw/:standard/;

# open the html template
my $template = HTML::Template->new(filename => 'template.tmpl');

# fill in some parameters
$template->param(
    something => "Test",    
    var1      => "Some Comment",
    var2      => "Another comment"
);

print header,
      $template->output;