Perl-subroutine

最新推荐文章于 2022-09-21 00:00:00 发布

毒师

最新推荐文章于 2022-09-21 00:00:00 发布

阅读量134

点赞数

CC 4.0 BY-SA版权

文章标签： Perl

本文链接：https://blog.youkuaiyun.com/weihe6666/article/details/83876894

本文通过示例解释了Perl编程语言中特殊符号@_和$_的作用。@_用于引用传递给子程序的参数列表，而$_通常作为默认变量使用，尤其是在foreach循环中代表数组元素。

[b][size=large][align=center]Perl-@_-$-[/align][/size][/b]

@_和$_代指什么？看下面的例子：


my @fred=qw{1 3 5 7 9};
my $fred_total = total(@fred);
print "The total of \@fred is $fred_total.\n";
print "Enter some numbers on separate lines:";
#my $user_total = total(chomp(<STDIN>));
sub total{
	my $vari_total = 0;
foreach(@_){
	$vari_total += $_;
	print "$_\n";
}
$vari_total;
}
#end