Re: Как запустить perl-программу в nginx

[Денис Ильиных]

ну как бы ) если у вас функция dienow внутри главной функции то
передавать не нужно, а если рядом то нужно. Область видимости разная )
потому так и написал что бы уж наверняка )

вы же печатаете на вывод через $r->print(); а как вы будете это делать
если $r неопределена.



9 августа 2011 г. 9:14 пользователь Vladislav Vladimirovich
<tvword на gmail.com> написал:
> 7 августа 2011 г. 23:24 пользователь Денис Ильиных <greyhard на gmail.com>
> написал:
>>
>> можно сделать так
>>
>> opendir (CURDIR, $foldname) or dienow($r,"Ошибка при открытии каталога
>> $foldname: $!");
>>
>> sub dienow {
>>  my($r,$msg) = @_;
>>  $r->print($msg);
>>  return OK;
>> }
>
> Большое спасибо. Работает! Правда, не совсем понятно зачем передавать в
> параметрах вызова переменную $r?
> Наверное, она отвечает за место в пространстве браузера, куда будет
> выводиться текст?
> _______________________________________________
> nginx-ru mailing list
> nginx-ru на nginx.org
> http://mailman.nginx.org/mailman/listinfo/nginx-ru
>
>