数据结构
网络
RDBMS
操作系统
Java
MS Excel
iOS
HTML
CSS
Android
Python
C 编程
C++
C#
MongoDB
MySQL
Javascript
PHP
物理学
化学
生物学
数学
英语
经济学
心理学
社会学
时尚研究
法律研究在 Perl 中将参数传递给子例程
您可以像在任何其他编程语言中一样将各种参数传递给 Perl 子例程，并且可以使用特殊数组 @_ 在函数内访问它们。因此，函数的第一个参数在 $_[0] 中，第二个参数在 $_[1] 中，依此类推。
您可以像传递任何标量一样传递数组和哈希，但正常情况下传递多个数组或哈希会导致它们失去各自的身份。因此，我们将使用引用（在下一章中解释）来传递数组或哈希。
我们来尝试以下示例，它获取一个数字列表，然后打印它们的平均值 −
示例
#!/usr/bin/perl
# Function definition
sub Average {
# get total number of arguments passed.
$n = scalar(@_);
$sum = 0;
foreach $item (@_) {
$sum += $item;
}
$average = $sum / $n;
print "Average for the given numbers : $average\n";
}
# Function call
Average(10, 20, 30);输出
当执行上述程序时，它会产生以下结果 −
Average for the given numbers : 20
更新于: 29-11-2019
2K+ 浏览量
广告