use HTML::Template;

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

  # fill in some parameters in the template
  $template->param(home => $ENV{HOME});
  $template->param(path => $ENV{PATH});

  # send the obligatory Content-Type
  print "Content-Type: text/html\n\n";

  # print the template
  print $template->output;