Как я могу передать элементы в ссылке на массив Perl как отдельные аргументы для подпрограммы?

Question

У меня есть список, содержащий аргументы, которые я хочу передать функции. Как мне вызвать эту функцию?

Например, представьте, что у меня есть эта функция:

sub foo {
  my ($arg0, $arg1, $arg2) = @_;
  print "$arg0 $arg1 $arg2\n";
}

И скажем, у меня есть:

my $args = [ "la", "di", "da" ];

Как мне позвонить foo без записи foo($$args[0], $$args[1], $$args[2])?

Answer 1

Вы разыменовываете ссылку на массив, вставляя перед ней @.

foo( @$args );

Или если вы хотите быть более явным:

foo( @{ $args } );

Answer 2

Это должно сделать это:

foo(@$args)

На самом деле это не apply функция. Этот синтаксис просто разыменовывает ссылку на массив обратно в обычный массив. man perlref расскажет вам больше о ссылках.

Answer 3

Попробуйте это:

foo(@$args);

Answer 4

foo(@$args);

Или, если у вас есть ссылка на foo:

my $func = \&foo;
...
$func->(@$args);

Answer 5

Все просто. Foo (@ {$ арг})