Perl 下面是做什么的？

有人能告诉我这是干什么用的吗

my ($pkg, @elements) = @_;
my $me = "${pkg}::new()";

常见于此：

sub perl_func () {
  my ($pkg, @elements) = @_;   
}

它相当于PHP中的以下内容：

list ($pkg, $elements) = $an_array;

在上面的上下文中，这是Perl实现函数参数的奇怪方式，请想象它是这样的：

sub perl_func ($pkg, @elements) {
}

最后，这是：

my $me = "${pkg}::new()";

只是一个字符串，请考虑：

my $pkg = "rhubarb";

---

然后，

$me=“rhubarb:：new（）”

考虑到你三分钟前刚刚问了一个同样与Perl有关的问题，我怀疑这是家庭作业。你已经完成了完美的解释，非常感谢你的帮助：）Perl的子例程参数实现没有什么奇怪的地方。

sub Perl_func（$pkg，@elements）{…}

完全错了。这不是Java@TLP对于新手来说，Perl的一切都很奇怪：-）@Zaid我想这应该是伪代码。史蒂夫：对新手来说，每种语言都很奇怪=P

my $pkg = "rhubarb";