Perl 教程 之 Perl 子程序(函数) 4

Perl 子程序(函数)

Perl 子程序也就是用户定义的函数。

Perl 子程序即执行一个特殊任务的一段分离的代码，它可以使减少重复代码且使程序易读。

向子程序传递列表

由于 @_ 变量是一个数组，所以它可以向子程序中传递列表。

向子程序传递哈希

当向子程序传递哈希表时，它将复制到 @_ 中，哈希表将被展开为键/值组合的列表。

实例

!/usr/bin/perl

方法定义

sub PrintHash{
my (%hash) = @_;

foreach my $key ( keys %hash ){
my $value = $hash{$key};
print "$key : $value\n";
}
}
%hash = ('name' => 'baidu', 'age' => 3);

传递哈希

PrintHash(%hash);
以上程序执行输出结果为：

age : 3
name : baidu