17、Perl 编程：包定义、分布创建与构建系统详解

Perl 编程：包定义、分布创建与构建系统详解

1. 包的定义与版本指定

在 Perl 中，我们可以在同一个文件里定义多个小的包，示例代码如下：

use v5.12;
package Navigation {
 ...
}
package DropAnchor {
 ...
}

通常情况下，我们会在每个文件中使用一个包，这样做虽然大多是无意的，但能达到类似的效果，因为我们使用的词法变量的作用域也仅限于文件（而非包）。明确指定包的作用域，也能清晰界定我们所使用的词法变量的作用范围。

从 Perl 的新包语法来看，它允许我们指定包的版本，无论是否使用代码块，示例如下：

use v5.12;
package Navigation 0.01;
package DropAnchor 1.23 { ... }

实际上，这是设置 $VERSION 变量的快捷方式，当其他代码需要获取包的版本时，会查找这个变量。不过，它本质上是一个普通的 Perl 标量，若有需要，我们也能直接自行设置。

2. 练习部分

2.1 练习一

有如下需求，岛上的 Oogaboogoo 原住民对日期和月份有着独特的命名方式。下面是 Gilligan 编写的一段简单但不太完善的代码，我们需要对其进行修正，添加月份名称的转换函数，并将其封装成一个库。若要获得额外加分，可以添加适当的错误检查，并思考文档中应包含的内容。 </