#!/usr/bin/perl
use warnings;
use strict;

use HTML::Template;

# oeffne das html-Template
my $template = HTML::Template->new(filename => 'test.tmpl'); # Fehlerabfrage: siehe unten

# Parameter einfuellen
$template->param(HOME => $ENV{HOME});
$template->param(PATH => $ENV{PATH});

# den nötigen Content-Type senden und dann das gefuellte Template ausgeben
print "Content-Type: text/html\n\n";
print $template->output;