#!/usr/bin/perl
use strict;

...

&header();
&mitte();
&footer();

print "Content-Type: text/html; charset=utf-8\n\n";
print "TESTAUSGABE";
print $HTML;