Re[2]: Perl модуль и докачка

[Konstantin Petrenko <rage@xxxxxx>]

Здравствуйте Igor,

Friday, December 29, 2006, 2:32:30 AM, you wrote:

>>>> Наткнулся на очень не приятный глюк. Файло отдается модулем на перле:
>>>> ===
>>>> ...
>>>>      if( -e $fn){
>>>>        $r->variable("sid",$sid);
>>>>        $r->allow_ranges;
>>>>        $r->header_out("Content-Length", -s $fn);
>>>>        $r->send_http_header;
>>>>        $r->sendfile($fn);
>>>>        return OK;
>>>>      }
>>>>      else{
>>>>        return HTTP_NOT_FOUND;
>>>>      }
>>>> ...
>>>> ===
>>>> Но, если прервать закачку и потом возобновить - то файлы как-бы
>>>> докачивается но на самом деле отдается заного. В итоге содердимое
>>>> файла превращается в кашу. Идет кусок сначала, потом где была прервана
>>>> закачка, фаил начинается опять сначала.
>>>> 
>>>> nginx/0.5.4, ОС FreeBSD 6.2-PRE
>>>> в конфиге написано так:
>>>> ===
>>>>        location /downloads {
>>>>            set $sid 1;
>>>>            perl getfile::handler;
>>>>        }
>>>> ===
>>> 
>>> Прилагаемый патч должен исправить ошибку.
>> Это неверный патч.
> Впрочем, нет - верный.

Спасибо, вроде помогло. Еще потестирую...

--