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文档中有完整的预定义模块列表。
|