perl - 如何将 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 } );