Perl支持以模块对代码进行封装,模块的文件名一般以.pm做后缀。
-
封装demo
定义一个Firstperl_package模块存放在路径/home/soft/tools_perl/下,即/home/soft/tools_perl/Firstperl_package.pm 。
package Firstperl_package;#package指令创建模块
#!/usr/bin/perl
use strict;
use warnings;
.
.
.
.
sub fun1{ xxxxx}
sub fun2{ xxxxx}
sub fun3{ xxxxx}
sub fun4{ xxxxx}
.
.
.
.
#定义模块主函数,参数一般从这里传入
sub Firstperl_package{xxxx}
1; #模块文件结尾要retrun 1
-
调用demo
test.pl脚本下调用该模块。
#!/usr/bin/perl
use strict;
use warnings;
requ