sub fall1{
    my ($self) = @_;

    # einige Berechnungen, Datenbankinteraktionen, etc.

    my $template = $self->load_tmpl($self->{tmpl_dir} . '/template.tmpl');
    $template->param(IRGENDWAS => $value);
    return $template->output();
}

sub fall2{
    my ($self) = @_;

    # jede Menge anderer Sachen...

    my $template = $self->load_tmpl($self->{tmpl_dir} . '/template.tmpl');
    $template->param(IRGENDWAS => $value,
                             MESSAGE  => $msg,);
    return $template->output();
}