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

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

1. 同一文件中定义多个小包

在同一文件中定义多个小包是很有用的，示例代码如下：

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

通常，我们每个文件使用一个包，这样做的效果大致相同，但这往往是偶然的，因为我们使用的词法变量的作用域也限定于文件（而非包）。明确指定包的作用域也能显式地限定我们使用的词法变量的作用域。

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

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

这实际上是设置 $VERSION 变量的快捷方式，当其他代码需要包的版本时会查找该变量。它是一个常规的 Perl 标量，我们也可以直接自行设置它。

2. 练习

• 练习 1 ：岛上的 Oogaboogoo 原住民对日期和月份有不寻常的命名。以下是 Gilligan 编写的一些简单但不太完善的代码。需要修复它，添加月份名称的转换函数，并将整个代码做成一个库。额外加分项是添加适当的错误检查，并考虑文档中应包含的内容。

@day =