從嵌入式Perl腳本中返回多個值

Question

我在C程序中嵌入了Perl腳本。我想從Perl腳本中返回一個整數數組。但是，返回整數的數字n是該程序的輸入，不能在Perl腳本中進行硬編碼。有沒有辦法做到這一點？下面是一些例子：

實施例1（n是在PERL子程序已知的並且等於2）：

@num = {1, 2, 3, 4}; 
($num[0], $num[1]); // works, returns the two values 

實施例2（n是不知道）：

@num = {1, 2, 3, 4}; 
(@num); // does not work 

示例3（n未知）：

@num = {1, 2, 3, 4}; 
$string = "($num[0], $num[1], $num[2], $num[3])"; 
$string; // does not work 

Answer 1

小心，{ }用於HASH引用。我想你只需要：

my @num = qw/1 2 3 4/; 
@num; 

或

my @num = (1, 2, 3, 4); 
@num; 

或

my @num = (1..4); 
@num; 

或USIG一個數組引用：

my $num = [1, 2, 3, 4]; 
@$num;