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

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

можно сделать так

opendir (CURDIR, $foldname) or dienow($r,"Ошибка при открытии каталога
$foldname: $!");

sub dienow {
  my($r,$msg) = @_;
  $r->print($msg);
  return OK;
}

7 августа 2011 г. 17:41 пользователь Vladislav Vladimirovich
<tvword на gmail.com> написал:
> Подскажите, как в конструкции
> opendir (CURDIR, $foldname) or die "Ошибка при открытии каталога $foldname:
> $!";
> отпраить сообщение об ошибке на экран web-браузера?
> Обычно, для print делаю так -
> $r-> print ();
> А для die куда $r вставлять?
> _______________________________________________
> nginx-ru mailing list
> nginx-ru на nginx.org
> http://mailman.nginx.org/mailman/listinfo/nginx-ru
>
>