Perl 배열 참조의 요소를 별도의 인수로 서브 루틴에 전달할 수 있습니까?

Question

함수에 전달할 인수가 들어있는 목록이 있습니다. 어떻게 그 함수를 호출 할 수 있습니까?

예를 들어, 나는이 기능을 가지고 상상 :

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

과의 내가 있다고 가정 해 봅시다 : foo($$args[0], $$args[1], $$args[2])를 작성하지 않고

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

가 어떻게 foo 부릅니까?

Answer 1

이 그것을 수행해야합니다 실제로 apply 함수가 아닙니다

foo(@$args) 

. 이 구문은 배열 참조를 다시 일반 배열로 역 참조합니다. man perlref은 referecences에 대해 자세히 알려줍니다.

Answer 2

이 시도 :

foo(@$args); 

Answer 3

배열 참조 앞에 @을 붙임으로써 참조를 참조 해제합니다. 좀 더 명시 할 경우

foo(@$args); 

는 또는 : 당신이 foo에 대한 참조가있는 경우

는

foo(@{ $args }); 

Answer 4

foo(@$args); 

또는 :

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

Answer 5

그것은 간단합니다. foo (@ {$ args})