Perl自定义模块的方法与实例

发布时间:2019-08-12编辑:脚本学堂
本文介绍下,在perl编程中,自定义模块的方法,学习在perl5中自定义一个模块的方法,有需要的朋友作个参考吧。

本节主要内容:
自定义perl模块

1:模块的文件名:
   perl5以.pm结尾

2:放置目录:
可以放在自定义目录(目录位置必须加入@INC)
或放在调用这个模块的文件的当前目录;
或放到perl5 pm的固定目录(/usr/lib64/perl5/5.8.8/x86_64-linux-thread-multi),这个因系统而异;

3:模块文件格式:
以package pack_name(包名)开头,以1;结尾(返回1真值);

4:调用
 

复制代码 代码示例:
use pack_name
require "pack_name.pm";

5.  for example:

5.1 package file:
 

复制代码 代码示例:
$ cat wel.pm
package wel;
sub pt{      
       my $name=shift;
       print "hi ".$name." welcome to perl pm world!!! ";
    }
1;
 

5.2 call:
 

复制代码 代码示例:

$ cat package.pl
#!/usr/bin/perl -w
use wel;

wel::pt(www.jb200.com);
 

5.3 run:
 

复制代码 代码示例:
$ perl  package.pl
hi www.jb200.com,welcome to perl pm world!!!