perl и header_out

[deniswork at uzvik.kiev.ua]

День добрый,
Хочу отдать X-Accel-Redirect встроенным перлом.

кусок конфига.

        location / {
            perl  hello::dl;
        }

        location /dl {
            root /home/denis/;
            internal;
        }


и перл часть:

sub dl {
    my $r = shift;
   $r->send_http_header;
   $r->header_out("X-Accel-Redirect","/dl/file");
#   $r->internal_redirect("/dl/file.txt");
    return OK;
}

файл /home/denis/dl/file.txt существует.

Что делаю не так? Подскажите пожалуйста.

В логах пусто, не считая