sub param_hash_bilden { my $file = shift; open (I, $file) or die $file; my $include; if (file_muss_templaten($file)) { my $hti = HTML::Template->new (filehandle=>*I); my %iArgs = include_param_hash_bilden($file); $hti->param(%iArgs); $include = $hti->output(); } else { local $/; $include = ; } (INCLUDE => $include); }