ap_register_cleanup(p, (void*)handler, modperl_handler_cleanup, ap_null_cleanup);
apr_register_cleanup(p, (void*)handler, modperl_handler_cleanup, apr_null_cleanup);
modperl_handler_t *modperl_handler_new(ap_pool_t *p, void *h, int type){    modperl_handler_t *handler =         (modperl_handler_t *)ap_pcalloc(p, sizeof(*handler));    switch (type) {      case MP_HANDLER_TYPE_SV:        handler->cv = SvREFCNT_inc((SV*)h);        MpHandlerPARSED_On(handler);        break;      case MP_HANDLER_TYPE_CHAR:        handler->name = (char *)h;        MP_TRACE_h(MP_FUNC, "new handler %s\n", handler->name);        break;    };    ap_register_cleanup(p, (void*)handler,                        modperl_handler_cleanup, ap_null_cleanup);    return handler;}