教程集 www.jiaochengji.com
教程集 >  脚本编程  >  perl  >  正文 perl中USE与require的用法

perl中USE与require的用法

发布时间:2014-08-14   编辑:jiaochengji.com
本文介绍下,perl编程中Use与Require的用法,分享下二者引入文件的示例代码,供大家学习参考。

本节内容:
perl语言中USE与require的用法。
 
一,相同点:
都可以用来引用module(.PM)。

二,不同之处:
1) 区别在于USE是在当前默认的@INC里面去寻找,一旦模块不在@INC中的话,用USE是不可以引入的,但是require可以指定路径;
2)use引入的名称不需要后缀名,默认找.PM文件,而require需要后缀名,且后缀名可以为.PM或.PL;

例子:c:\perl目录下3个文件如下(且module文件的最后必须有1;)
 

复制代码 代码示例:

#file : CallModule.pl
use strict;

BEGIN {
    my $scriptDir = $0;
    $scriptDir =~ s:\\:/:g;
    $scriptDir =~ s,/?[^/]+$,,;
    $scriptDir = "." if ($scriptDir eq "");
    unshift(@INC, $scriptDir);
}

#require "c:\\perl\\pmodule1.pl";
require "pmodule1.pl";
use pmodule2;

Hello1();
Hello2();

print "I am caller!\n";

exit 0;

#file : pmodule1.pl
use strict;

sub Hello1
{
    print "Hello1\n";
}

1;

#file : pmodule2.pm
use strict;

sub Hello2
{
    print "Hello2\n";
}

1;

3)use语句是编译时引入的,require是运行时引入的;

来看下错误引用的例子:
 

复制代码 代码示例:
use Config;
if( $Config{'osname'} eq "MSWin32" )
{
    use Win32Module;
}
else
{
    use UnixModule;
}
 

正因为use是发生在编译期,代码没有执行,所以$Config变量的值是无法判断的。
在内部,use其实调用了require和import静态函数。
import()函数告诉包哪些特征将要被导入当前包中,这意味着用之前不必验证函数或者变量是否合法。
而require是不会调用import()的。

4)use引入模块的同时,也引入了模块的子模块。而require则不能引入,要在重新声明;

例如:
use my

my中包含了一个Module.pm

而require 则需要引入:
 

复制代码 代码示例:
require my
require my::Module.pm

如果不想让use引入Module.pm则可以用 use require() 加一对括号来说明即可。

5)USE引用模块时,如果模块名称中包含::双冒号,该双冒号将作为路径分隔符,相当于Unix下的/或者Windows下的\。

例如:
use MyDirectory::MyModule;
编译器将从@INC指定的目录下的MyDirectory子目录去寻找MyModule模块, 类似如下路径:
C:\Perl\lib\MyDirectory
C:\Perl\ext\lib\MyDirectory
C:Perl\site\lib\MyDirectory

以上介绍了perl中USE与require的用法的异同,希望对大家有所帮助。

您可能感兴趣的文章:
perl中USE与require的用法
perl模块安装的自定义路径方法
Perl自定义模块的方法与实例
perl实例之http请求的小例子
php的use和require的区别
《Perl编程24学时教程》笔记第17课 perl的CGI概述
perl中INC设置的三个例子
perl中Getopt::Long与pod::usage用法举例
perl实例之子程序
php 5.2.x中require、include的区别

[关闭]
~ ~