int i; const apr_array_header_t *arr = apr_table_elts(base); apr_table_entry_t *entries  = (apr_table_entry_t *)arr->elts; apr_table_t *merge = apr_table_copy(p, add);
apr_table_t *merge = apr_table_overlay(p, base, add);
static apr_table_t *modperl_table_overlap(apr_pool_t *p,                                          apr_table_t *base,                                          apr_table_t *add){    int i;    const apr_array_header_t *arr = apr_table_elts(base);    apr_table_entry_t *entries  = (apr_table_entry_t *)arr->elts;    apr_table_t *merge = apr_table_copy(p, add);    for (i = 0; i < arr->nelts; i++) {        if (apr_table_get(add, entries[i].key)) {            continue;        }        else {            apr_table_addn(merge, entries[i].key, entries[i].val);        }    }    return merge;}