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

[Vladislav Vladimirovich]

7 августа 2011 г. 23:24 пользователь Денис Ильиных <greyhard at gmail.com>написал:

> можно сделать так
>
> opendir (CURDIR, $foldname) or dienow($r,"Ошибка при открытии каталога
> $foldname: $!");
>
> sub dienow {
>  my($r,$msg) = @_;
>  $r->print($msg);
>  return OK;
> }
>

Большое спасибо. Работает! Правда, не совсем понятно зачем передавать в
параметрах вызова переменную $r?
Наверное, она отвечает за место в пространстве браузера, куда будет
выводиться текст?
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mailman.nginx.org/pipermail/nginx-ru/attachments/20110809/347bffdc/attachment.html>