nginx embedded perl и upload module

[Roman Vasilyev]

добрался до следующей проблемы:
требуется перед обработчиком upload module дернуть perl handler с 
мелкими проверками загружаемого файла.

sub handler {
   my $r = shift;
   return 402 if $r->request_method ne "POST";
   ......
   return 410 if $time > $exp;
   return 405 if $maxSize >0 and $size>$maxSize;
}

location /upload {
     perl my::handler;
     upload_pass        blah;
     upload_store       blah/blah;
}

не срабатывет, посмотрев в исходник вижу следующее:

ngx_http_perl_module.c:
=============================
static char *
ngx_http_perl(ngx_conf_t *cf, ngx_command_t *cmd, void *conf)
{
...
     clcf = ngx_http_conf_get_module_loc_conf(cf, ngx_http_core_module);
     clcf->handler = ngx_http_perl_handler;
...
}

ngx_http_upload_module.c
=============================
static char * /* {{{ ngx_http_upload_pass */
ngx_http_upload_pass(ngx_conf_t *cf, ngx_command_t *cmd, void *conf)
{
...
     clcf = ngx_http_conf_get_module_loc_conf(cf, ngx_http_core_module);
     clcf->handler = ngx_http_upload_handler;
...
}

похоже, что обработчик одного модуля перетирает другой.
Понимаю что оба модуля лазят достаточно глубоко в потроха сервера, хотел 
спросить, есть ли выход из данной ситуации, кто бы что мог посоветовать?