Perl @_的使用

Perl 子程序可以和其他编程一样接受多个参数，子程序参数使用特殊数组 @_ 标明。

因此子程序第一个参数为 $[0], 第二个参数为 $[1], 以此类推。

不论参数是标量型还是数组型的，用户把参数传给子程序时，perl默认按引用的方式调用它们。

但在使用的时候需要注意：

#!/usr/bin/perl -w

sub hello{
    my $f1 = "@_";  #取所有的参数组成一个字符串，各个参数用‘ ’隔开
    my $f2 = @_; #取参数的个数, 等同于scalar(@_)
    my ($f3) = @_; # 取第一个参数的值, 等同于 $_[0]
    @w = @_; #复制整个数组
    print "f1 is $f1\n";
    print "f2 is $f2\n";
    print "f3 is $f3\n";
}

hello(1,2,3);

结果如下：

f1 is 1 2 3
f2 is 3
f3 is 1