以下是做什么的？

Question

有人可以告诉我这是做什么的吗？

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

Answer 1

my ($pkg, @elements) = @_;

常见于此：

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()"