use FileHandle;
my $fh_header = new FileHandle;
$fh_header->open("header.html") or die("Cannot open file: $!\n");
print $fh "stuff ...";

my $fh_footer = new FileHandle;
$fh_footer->open("footer.html") or die("Cannot open file: $!\n");