Perl教学(14)Perl5地包和模块之五

2、导入模块
将模块导入你的Perl程序中使用use语句，如下句导入了Mymodule模块：
use Mymodule;
这样，模块Mymodule中的子程序和变量就可以使用了。
取消导入模块使用no语句，如下句取消了Mymodule模块的导入：
no Mymodule;
下面看一个导入模块和取消导入的例子，使用integer模块要求所有数字运算基于整数，浮点数在运算前均被转化为整数。

1: #!/usr/local/bin/perl
2:
3: use integer;
4: $result = 2.4 + 2.4;
5: print ("$result\n");
6:
7: no integer;
8: $result = 2.4 + 2.4;
9: print ("$result\n");
程序输出如下：

$ program
4
4.8
$
如果use或no语句出现在语句块中，则只在该块的有效范围内起作用，如：

use integer;
$result1 = 2.4 + 2.4;
if ($result1 == 4) {
no integer;
$result2 = 3.4 + 3.4;
}
$result3 = 4.4 + 4.4;
结果输出如下：

4
6.8
8
这里，no语句只在if语句中有效，出了if语句仍使用integer模块，因此4.4在做加法前被转化成了4。
3、预定义模块
Perl 5提供了许多有用的预定义模块，可以用use导入和no语句取消。下面是库中最有用的一些模块：

integer 使用整数运算
Diagnostics 输出较多的诊断信息（警告）
English 允许英名用作系统变量的别名
Env 导入环境变量的Perl模块
POSIX POSIX标准（IEEE 1003.1）的Perl接口
Socket 装载C语言的套接字处理机制

Perl文档中有完整的预定义模块列表。