在Perl中,`use lib`和`lib-> import`有什么区别?

时间:2017-02-15 03:30:30

标签: perl

在Perl 5.24.1中,使用use liblib->import有什么区别? 我看到两者都用于向@INC添加目录。 我正在使用没有附加组件的库存Perl。 我读过了 http://perldoc.perl.org/lib.html 我对它的使用方式了解不多。

以下是一个例子:

在下面的示例代码中,第一个use lib始终有效,而第二个lib->import在我的代码中失败,我看到它在同一台机器上的其他代码中工作。

#!/usr/bin/perl -T

use warnings;
use diagnostics;
use strict;
# new perl 2.24.1 requires FindBin
use FindBin;
print "found: $FindBin::Bin\n";
#This always works:
#use lib $FindBin::Bin;
#why does this not always work?
#lib->import($FindBin::Bin);

foreach my $var(@INC){
    print "$var \n";
}

2 个答案:

答案 0 :(得分:3)

use lib $FindBin::Bin;

将执行此操作(大约):

BEGIN { require "lib.pm"; lib->import($FindBin::Bin); }

加载/编译lib.pm并在编译时调用import (因此是BEGIN块)。

当你单独调用lib->import(...)时,这是有效的,但只有当lib已经加载时,无论你是什么“导入”都在运行时与编译时有意义。使用lib导入,这可以正常工作,但只会影响将来的require(或eval "use ...")调用。对于其他包,如果你试图导入函数之类的东西,这可能是荒谬的,特别是如果这些函数有一个影响编译时解析的原型。

答案 1 :(得分:3)

use lib EXPR加载lib.pm,并在编译时调用lib->import(EXPR)

只是做lib->import(EXPR)会做同样的事情,除非如果没有加载lib.pm,它将什么都不做。 (如果没有这样的sub,则忽略对import()或unimport()的方法调用。)但它将在运行时执行,除非你在BEGIN块中有它,这意味着对@INC的更改将不会及时执行以影响后来的use