目录
子程序定义
sub 子程序名{};
子程序命名遵守字母,数字,下划线,首行不能为下划线的规则;
调用子程序
调用子程序称为call子程序,使用与号 &子程序名调用,为了防止子程序名与Perl内置函数歧义尽量不要省略&号;
子程序执行过程中,最后一次计算结果会被当成子程序的的返回值;
例如,sub2.pl
#!/usr/bin/perl
use strict;
use warnings;
my $a=1;
my $b=2;
my $result1=sum_a_b();
my $result2=sum_a_b1();
print "$result1\n\n";
print "$result2\n";
sub sum_a_b{
print "Calling sum_a_b\n";#用于辅助调试,确认该子程序被调用到了
$a+$b;
}
sub sum_a_b1{
print "Calling sum_a_b1\n";
$a+$b;
print "Calling sum_a_b1\n";#此时该子程序返回结果为1,表示子程序成功输出信息
}
perl sub2.pl