学习笔记 Perl模块概述

开发 架构
Perl语言中Perl模块有很多值得学习的地方,那么你对Perl模块的概念是否熟悉呢,这里和大家分享一下,希望本文的介绍能让你有所收获。

 本文和大家重点讨论一下Perl模块的概念,多数大型程序都分割成多个部件,每一部件通常含有一个或多个子程序及相关的变量,执行特定的一个或多个任务。集合了变量和子程序的部件称为程序Perl模块。

Perl模块

多数大型程序都分割成多个部件,每一部件通常含有一个或多个子程序及相关的变量,执行特定的一个或多个任务。集合了变量和子程序的部件称为程序Perl模块。

1、创建Perl模块

Perl5中用包来创建Perl模块,方法是创建包并将之存在同名的文件中。例如,名为Mymodult的包存贮在文件Mymodult.pm中(扩展名.pm表示PerlModule)。下例的Perl模块Mymodult含有子程序myfunc1和myfunc2及变量$myvar1和$myvar2。

  1. 1:#!/usr/local/bin/perl  
  2. 2:  
  3. 3:packageMymodule;  
  4. 4:requireExporter;  
  5. 5:@ISA=qw(Exporter);  
  6. 6:@EXPORT=qw(myfunc1myfunc2);  
  7. 7:@EXPORT_OK=qw($myvar1$myvar2);  
  8. 8:  
  9. 9:submyfunc1{  
  10. 10:$myvar1+=1;  
  11. 11:}  
  12. 12:  
  13. 13:submyfunc2{  
  14. 14:$myvar2+=2;  
  15. 15:}  

第3~7行是标准的PerlPerl模块定义方式。第3行定义包,第4行包含内置PerlPerl模块Exporter,6、7行进行子程序和变量的输出以与外界联系。第6行创建名为@EXPORT的特殊数组,该数组中的子程序可以被其它程序调用,这里,myfunc1和myfunc2可以被访问。其它任何在Perl模块中定义但没有赋给数组@EXPORT的子程序都是私有的,只能在Perl模块内部调用。第7行创建另一个名为@EXPORT_OK的特殊数组,其中含有可被外部程序访问的变量,这里含有$myvar1和$myvar2。

2、导入Perl模块

将Perl模块导入你的Perl程序中使用use语句,如下句导入了MymodulePerl模块:
useMymodule;
这样,Perl模块Mymodule中的子程序和变量就可以使用了。
取消导入Perl模块使用no语句,如下句取消了MymodulePerl模块的导入:
noMymodule;

下面看一个导入Perl模块和取消导入的例子,使用integerPerl模块要求所有数字运算基于整数,浮点数在运算前均被转化为整数。

  1. 1:#!/usr/local/bin/perl  
  2. 2:  
  3. 3:useinteger;  
  4. 4:$result=2.4+2.4;  
  5. 5:print("$result\n");  
  6. 6:  
  7. 7:nointeger;  
  8. 8:$result=2.4+2.4;  
  9. 9:print("$result\n");  

程序输出如下:

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

  1. useinteger;  
  2. $result1=2.4+2.4;  
  3. if($result1==4){  
  4. nointeger;  
  5. $result2=3.4+3.4;  
  6. }  
  7. $result3=4.4+4.4;  

结果输出如下:
4
6.8
8
这里,no语句只在if语句中有效,出了if语句仍使用integerPerl模块,因此4.4在做加法前被转化成了4。

3、预定义Perl模块

Perl5提供了许多有用的预定义Perl模块,可以用use导入和no语句取消。下面是库中最有用的一些Perl模块:
Perl文档中有完整的预定义Perl模块列表。
注:世界各地的Perl5用户写了许多有用的Perl模块,CPAN(ComprehensivePerlArchiveNetwork)的Perl文档有其完整的列表。关于CPAN的更多信息见其网址:http://www.perl.com/perl/CPAN/README.html。
 

【编辑推荐】

  1. Linux操作系统下安装Perl及Perl模块方法
  2. Perl文件句柄概念详解
  3. 详细介绍Linux安装Perl及Perl模块方法
  4. CGI Lite Perl模块元字符输入验证漏洞
  5. 术语汇编 Perl变量中Perl关联数组用法解析

 

 

责任编辑:佚名 来源: csdn.net
相关推荐

2010-07-16 12:50:45

Perl语言

2010-07-16 17:38:12

Perl包

2010-07-13 15:43:57

Perl语言

2010-07-21 14:18:27

Perl函数

2010-07-21 13:27:06

Perl模式匹配

2010-07-21 14:08:28

Perl命令行

2010-07-13 12:50:47

Perl变量

2010-07-15 18:04:20

Perl模式

2010-07-26 10:51:26

Perl模式匹配

2010-07-20 15:18:41

Perl基本语法

2010-07-13 13:15:17

Perl

2010-07-15 10:07:29

Perl指令

2010-07-21 09:50:51

Perl调试

2010-07-13 16:34:34

Perl 哈希表

2010-07-15 11:29:25

Perl格式化输出

2010-07-20 10:58:39

Perl脚本

2010-07-19 11:07:13

Perl控制结构

2010-07-19 16:47:54

Perl

2010-07-14 17:11:57

Perl文件

2010-07-20 13:44:02

Perl方法
点赞
收藏

51CTO技术栈公众号