在數組中傳遞參數Perl

Question

這是我的問題：我想使用帶有動態數量參數的例程。舉例來說，這裏是我的子：

dynamic_sub($firstMandatoryArgment, "second argument", $thirdArgument); 

我可以叫dynamic_sub與任意數量的參數（但有些是強制性的）。在我的程序中，參數的數量取決於上下文。所以我想寫這樣的事情：

my @args = ($firstMandatoryArgment, "second argument", $thirdArgument, ...); 

dynamic_sub(@args); 

的事情是我不能改寫dynamic_sub（），所以我必須找到一個辦法讓我的論點到一個數組，然後調用dynamic_sub（）與我的一系列參數。當然@args應該被解釋爲許多參數，而不是作爲一個數組;）

提前謝謝！

Answer 1

在Perl中，子程序採用參數列表列表，其內部分配給數組@_。因此，在大多數情況下，使用數組或值列表調用子是同一件事。

一個例外是當子程序使用原型：

sub without_prototypes { say "@_" } 
sub with_prototypes ($) { say "@_" } 

my @args = 1 .. 5; 

without_prototypes(@args); # @args is used in list context, prints "1 2 3 4 5\n". 
with_prototypes(@args); # @args is used in scalar context, prints "5\n" (length). 
&with_prototypes(@args); # the & disables prototypes; prints "1 2 3 4 5\n". 

Answer 2

，可以作爲參數傳遞的唯一的事情是標量的列表，以便

my @args = ($firstMandatoryArgment, "second argument", $thirdArgument, ...); 
dynamic_sub(@args); 

是一回事as

my @args = ($firstMandatoryArgment, "second argument", $thirdArgument, ...); 
dynamic_sub($args[0], $args[1], $args[2], ...); 

如果sub（愚蠢）使用原型覆蓋這種行爲，可以覆蓋原型使用&：

&dynamic_sub(@args);