LINUX.ORG.RU

[perl]Переменная-функция.


0

0

Подскажите как переменной в Perl присвоить имя функции?

То есть, где-то есть такой вызов, например:

&$myvar1(arg1,arg2);

а где-то перед ним присваивали $myvar=$coolfunction;

Как-то так. Точно знаю, что это возможно, даже когда-то давно вроде так писал, но сейчас забыл точный синтаксис со всеми этим значками.

a)

sub mysub { … }

my $myvar1 = \&mysub;

b)

my $myvar1 = sub { … };

arsi ★★★★★ ()
sub test
{
	warn shift;
}

my $func = \&test;

$func->('test me');
&$func('and me');

Ты про это?

Olegymous ★★ ()

Да я про это. Спасибо всем отвечавшим, именно то, что требовалось.

anonymous_incognito ★★★★★ ()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.