@_Perl中的含义是什么？

perldoc perlvar是检查任何特殊名称的Perl变量信息的第一位。

报价单：

@_：在子例程中，数组@_包含传递给该子例程的参数。

在perlvar链接的perldoc perlsub（Perl子例程）中可以找到更多详细信息：

传入的所有参数都显示在数组中@_。

因此，如果您使用两个参数调用函数，则这些参数将存储在$_[0]和中$_[1]。

该数组@_是一个局部数组，但其元素是实际标量参数的别名。特别是，如果元素$ _ [0]被更新，则相应的参数将被更新（或者，如果它不可更新，则会发生错误）。

如果参数是在调用函数时不存在的数组或哈希元素，则仅在（如果有）对其进行修改或对其进行引用时才创建该元素。（一些早期版本的Perl不管是否分配了元素都创建了该元素。）分配给整个数组@_会删除该别名，并且不会更新任何参数。

通常，使用变量扩展传递给子级的@_参数：

sub test{
  my ($a, $b, $c) = @_;
  ...
}

# call the test sub with the parameters
test('alice', 'bob', 'charlie');

perlcritic声称这是正确的方法。

一的第一主打搜索perl @_说这个：

@_是子程序的传入参数列表。

它还对此有更长更详细的解释。

问题是在Perl中@_ 意味着什么。该问题的答案是，只要$_手段是在Perl，@_同样意味着他们。

似乎没有人提及其意义的这一关键方面以及他们的意义。

因此，它们既被用作代词，有时也被用作主题化器。

它们通常具有名义上的先例，尽管并非总是如此。

在大多数情况下，您还可以对单个变量使用shift：

$var1 = shift;

由于Perl有许多有趣的方式可以访问子例程中的外部信息，因此，您应该对此主题进行进一步研究。

Perlvar文档页面中列出了所有Perl的“特殊变量” 。

同样，如果一个函数返回一个数组，但是调用该函数时未将其返回的数据分配给任何变量，如下所示。此处调用split（），但未将其分配给任何变量。我们稍后可以通过@_访问其返回的数据：

$str = "Mr.Bond|Chewbaaka|Spider-Man";
split(/\|/, $str);

print @_[0]; # 'Mr.Bond'

这将拆分字符串$str并设置数组@_。

@ 用于数组。

在子例程中或在Perl中调用函数时，可以传递参数列表。在这种情况下，@_可以使用is将参数列表传递给函数：

sub Average{

    # Get total number of arguments passed.
    $n = scalar(@_);
    $sum = 0;

    foreach $item (@_){

        # foreach is like for loop... It will access every
        # array element by an iterator
        $sum += $item;
    }

    $average = $sum / $n;

    print "Average for the given numbers: $average\n";
}

函数调用

Average(10, 20, 30);

如果您遵守上面的代码，请参见foreach $item(@_)...行，此处传递输入参数。

永远不要尝试编辑@_变量！！！！切勿触摸它们。否则，您会得到意想不到的效果。例如...

my $size=1234;
sub sub1{
  $_[0]=500;
}
sub1 $size;

在调用sub1 $ size之前包含1234。但是在500（!!）之后，因此您不要编辑此值！！！您可以传递两个或多个值，然后在子例程中对其进行更改，所有这些值都将被更改！我从未见过这种效果的描述。我见过的程序也将@_ array保留为只读。并且只有您可以安全地传递变量，才不要更改内部子例程，您必须始终这样做：

sub sub2{
  my @m=@_;
  ....
}

将@_分配给本地子例程过程变量，然后使用它们。同样，在一些深化数组的深度递归算法中，您可以使用这种方法来减少用于本地变量的内存。仅当返回@_数组相同时。