sub get_template_bn {
    my $seitenname = shift;
    my $returnvalue = undef;
    { # cmd
        my $cmd = "SELECT template FROM template WHERE name='$seitenname'";
        my $sth = $dbh->prepare($cmd) || die $dbh->errstr;
        if( my $rv = $sth->execute ){
            $returnvalue = join"",@{$sth->fetchrow_arrayref()};
            $sth->finish();
        }else{
            die "Konnte \"$seitenname\" nicht aus seiten-Datenbank lesen: " . $dbh->errstr;
        }
    } # /cmd
    return $returnvalue;
} # get_Template_bn