如何创建perl模块

poxy

UID: 4091
帖子: 44
积分: 101
在线时间: 2 小时

1^# poxy 发表于 2007-04-16 14:04

如何创建perl模块

如何创建perl模块
哪里有相关资料?
谢谢~~

luxyi

UID: 41524
帖子: 133
积分: 305
在线时间: 1 天

2^# luxyi 发表于 2007-04-16 16:30

Perl Cookbook 第12章--.
Perl Cookbook 第12章
Perl 的帮助文件 perlmod

福尔马林

UID: 21234
帖子: 129
积分: 296
在线时间: 23 小时

3^# 福尔马林发表于 2007-04-18 09:42

# AAA.pm--package AAA;.
# AAA.pm
package AAA;

sub aaa {
print "hello\n";
}

1;

# test.pl
use AAA;

AAA::aaa;

结果：打印出hello。注意：模块文件结尾要返回1，否则use会die掉。如果要使用函数导出功能，需要继承Exporter模块，参考perldoc perlmod。通常我喜欢用别名来导出：

# test.pl
use AAA;

*aaa = \&AAA::aaa;
aaa;

结果一样：打印出hello。也可以这样：

# test.pl
use AAA;

*bbb = \&AAA::aaa;
bbb;

结果还是一样。