请问是不是应该这样的？

[Meteorlet]

以下这段代码在Perl5.8会出现Server Error，但是如果把my改成local就能通过了，难道不能传递指针给my？初学PERL请多多指教。

#!/usr/bin/perl

print ("Content-Type: text/html;\n\n");

@myarray = (1,2,3,4,5,6,7,8,9);
&my_sub(*myarray);
sub my_sub
{
my(*subarray) = @_; // 这里my改成local就ok了
print (@subarray);
}

[Meteorlet]

没人回答吗？自己顶

[AllCHN]

这不是指针，Perl里没有指针，你这里传递的是一个 glob, 同时包含标量、数组、散列、代码等的变量，我记得好像有5项或者6项内容包含在一个 glob 变量中，根据上下文决定使用哪一个。
glob 不能做语句体内部的局部变量，所以用 my 不能工作。

至于指针，似乎用引用的方式更接近一些。例如你上面的例子改为:

#!/usr/bin/perl

print ("Content-Type: text/html;\n\n");

@myarray = (1,2,3,4,5,6,7,8,9);
&my_sub(\@myarray);
sub my_sub
{
my $subarray = $_[0];
print @$subarray; # 用 @{$subarray} 更直观可读
}