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

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
>
>
_______________________________________________
nginx-ru mailing list
nginx-ru@nginx.org
http://mailman.nginx.org/mailman/listinfo/nginx-ru