perl 传参问题

[yuanyuanmmm]

perl。请问往一个数组里面传递2个参数，一个数组，一个变量
sub searchid
{
my @id = @_;
my $nowid = $_[0];

....}

这样写有问题，请指教啊～！！！

[shijiang]

大概是这样--》
searchid(\@para1,$para2);

sub searchid
{
my $para1= shift @_;
my $para2= shift @_;
my @array = @$para1;
....}

[busybeeCS]

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

@arr=(1,2,3,5,6);
$x=9;
&f(\@arr,$x);

输出：
12356
9

[fibbery]

久长已经说得很清楚了！

[jiuchang]

可以有两种方法
一是先变量，再数组，这样不需要使用引用
调用
func1($a, @b)
实现
sub func1
{
my ($a, @b) = @_;
...
}

二是数组在前，就需要使用数组的引用，使用时需要加一个转换或者就用引用
调用
func2(\@c, $d)
实现
sub func2
{
my ($c, $d) = @_;
my @arr = @{$c};
可以有下面两种获取数组元素的方法，效果是一样的
$c->[0]
$arr[0]
}

[proorck6]

Perl里面全是数组，数组加标量也是数组，这就出问题了，必须用引用。哈哈。

[坏脾气的猪]