<div class="gmail_quote">7 августа 2011 г. 23:24 пользователь Денис Ильиных <span dir="ltr"><<a href="mailto:greyhard@gmail.com">greyhard@gmail.com</a>></span> написал:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">
можно сделать так<br>
<br>
opendir (CURDIR, $foldname) or dienow($r,"Ошибка при открытии каталога<br>
$foldname: $!");<br>
<br>
sub dienow {<br>
  my($r,$msg) = @_;<br>
  $r->print($msg);<br>
  return OK;<br>
}<br></blockquote><div><br></div><div>Большое спасибо. Работает! Правда, не совсем понятно зачем передавать в параметрах вызова переменную $r?</div><div>Наверное, она отвечает за место в пространстве браузера, куда будет выводиться текст?  </div>
</div>