my $PACKAGE::header_tmpl = HTML::Template->new(
   filename => 'header.tmpl');
... 
sub Send_Header {
   $PACKAGE::header_tmpl->param(...);
   ...
}