sub cgiapp_prerun { my $self = shift; my $q = $self->query(); my $runmode = $self->get_current_runmode(); return unless(exists $template_files{$runmode}); $self->{"_html_template"} = HTML::Template->new(filename => $template_files{$runmode}, associate => $q); $self->{"_html_template"}->param($runmode => 1); }