Perl 教程 之 Perl 包和模块 5

简介: Perl模块创建可借助h2xs工具,如`h2xs -AX -n Person`来生成模块Person,包括README、Changes、Makefile.PL、MANIFEST、Person.pm测试脚本等文件。MANIFEST用于打包tar.gz发布到CPAN或分享。lib/存储源码,t/存放测试脚本。

Perl 教程 之 Perl 包和模块 5

Perl 包和模块

创建 Perl 模块

通过 Perl 分发自带的工具 h2xs 可以很简单的创建一个 Perl 模块。

你可以在命令行模式键入 h2xs 来看看它的参数列表。

h2xs 语法格式:

$ h2xs -AX -n ModuleName
参数说明:

-A 忽略 autoload 机制

-X 忽略 XS 元素

-n 指定扩展模块的名字

例如,如果你的模块在 Person.pm 文件中,使用以下命令:

$ h2xs -AX -n Person
执行以上程序将输出:

Writing Person/lib/Person.pm
Writing Person/Makefile.PL
Writing Person/README
Writing Person/t/Person.t
Writing Person/Changes
Writing Person/MANIFEST
Person 目录下你可以看到新增加的目录及文件说明:

README :这个文件包含一些安装信息,模块依赖性,版权信息等。

Changes :这个文件作为你的项目的修改日志(changelog)文件。

Makefile.PL :这是标准的 Perl Makefile 构造器。用于创建 Makefile.PL 文件来编译该模块。

MANIFEST :本文件用于自动构建 tar.gz 类型的模块版本分发。这样你就可以把你的模块拿到 CPAN 发布或者分发给其他人。它包含了你在这个项目中所有文件的列表。

Person.pm :这是主模块文件,包含你的 mod_perl 句柄代码(handler code)。

Person.t :针对该模块的一些测试脚本。默认情况下它只是检查模块的载入,你可以添加一些新的测试单元。

t/ :测试文件

lib/ :实际源码存放的目录

你可以使用 tar (Linux 上) 命令来将以上目录打包为 Person.tar.gz。

目录
相关文章
|
23天前
|
Perl
Perl 教程 之 Perl 包和模块 2
Perl教程介绍了BEGIN和END模块,它们在脚本加载编译后(BEGIN)和解释器退出前(END)执行。这两个关键字常用于模块创建。示例代码显示了BEGIN打印"这是BEGIN语句块",主程序打印"Begin和Block实例",而END在结束时打印"这是END语句块"。
13 0
|
23天前
|
存储 Perl
Perl 教程 之 Perl 包和模块 3
**Perl模块简述:**模块是可重用的代码包,如`Foo.pm`,包含`package Foo`及函数如`bar`和`blat`。`require`或`use`加载模块,`@INC`数组存储搜索路径。`eval`执行模块代码,末尾的`1;`确保成功加载。
19 0
|
2月前
|
Perl
|
2月前
|
Perl
|
23天前
|
Unix Windows Perl
Perl 教程 之 Perl 包和模块 4
Perl教程讲解了包和模块的使用。`require`和`use`函数都能调用模块,但有区别:`require`在运行时加载,需指定包名调用函数;`use`在编译时加载,无需包名且能引入子模块。`use`根据@INC路径找模块,`require`可指定路径。通过`use Exporter`, `@ISA = qw(Exporter)`, `@EXPORT`数组可导出默认符号。示例中展示了如何定义和导出模块中的函数。
13 3
|
24天前
|
Perl
Perl 教程 之 Perl 包和模块 1
Perl教程介绍了包和模块的概念。包是具有独立符号表的命名空间,允许在同一程序中使用相同变量名而不冲突。通过`package mypack;`定义包,使用`包名::变量名`来访问其他包的变量。示例展示了`main`和`Foo`两个包的交互,利用`__PACKAGE__`变量显示当前包名。程序输出显示了不同包中变量的独立性。
16 2
|
22天前
|
Perl
Perl 教程 之 Perl 包和模块 6
在Perl教程中,了解Perl包和模块的安装:解压Person.tar.gz,进入目录,运行"perl Makefile.PL"生成Makefile,接着"make"编译,"make test"检查,最后"make install"安装到系统。
8 0
|
2月前
|
存储 移动开发 Perl
|
2月前
|
移动开发 Perl
|
3月前
|
IDE Unix Linux