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