Почему может не работать такая конструкция?

perl

sub do_user_action
{
my $dbh=shift;
my $cgi=shift;
my $modules=shift;
my $text;

foreach(@$modules)
{
if (defined(&$_::static_user_action))
{
$text.=$_->static_user_action($cgi,$dbh);
}
}
return $text;
}

2) почему может быть не доступна переменная объявленная в мэине как $vasja='abc'; из модуля при обращении к ней как $::vasja; ?
Ответы:
1) диагностика какая?
2) в main эта переменная должна быть глобальной, например, объявленной не как "my", а как "our".
в смысле диагностика?


16 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.