59、Perl编程：包、模块、对象及DVD相关内容

Perl编程：包、模块、对象及DVD相关内容

1. Perl包和模块概述

1.1 Perl包

Perl包是一种将数据和子例程组合在一起的方式，其本质是一种使用变量和子例程名称而不与程序其他部分的名称冲突的方法。在编写Perl程序时，程序会自动属于一个名为main的包。除了main包，Perl库中还有其他包，你也可以定义自己的包。

一个Perl包通常位于一个文件中，在文件开头使用package语句来声明该文件为一个包并给包命名。例如，timelocal.pl文件定义了一个名为timelocal的包：

package timelocal;

若要引用另一个包中的子例程或变量，需要指定包名和变量（或子例程）名，语法如下：

$Package::Variable

若省略包名，Perl会假定你引用的是main包中的变量。

要在程序中使用一个包，可以调用require函数并传入包文件名作为参数。示例代码如下：

#!/usr/bin/perl -w # Use the ctime package defined in ctime.pl