在Perl中,`use lib`和`lib->;导入`?

在Perl中,`use lib`和`lib->;导入`?,perl,Perl,在Perl 5.24.1中,使用use lib和lib->import有什么区别? 我看到这两个应用程序都用于将目录添加到@INC。 我使用的是没有附加组件的stock Perl。 我读过 我不太了解它的使用方式 以下是一个例子: 在下面的示例代码中,第一个use lib始终有效,而第二个lib->import在我的代码中失败,我看到它在同一台机器上的其他代码中有效 #!/usr/bin/perl -T use warnings; use diagnostics; use strict; #

在Perl 5.24.1中,使用
use lib
lib->import
有什么区别? 我看到这两个应用程序都用于将目录添加到
@INC
。 我使用的是没有附加组件的stock Perl。 我读过 我不太了解它的使用方式

以下是一个例子:

在下面的示例代码中,第一个
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";
}
将这样做(大约):

它既加载/编译lib.pm,又在编译时调用import(因此是BEGIN块)


当您单独调用
lib->import(…)
时,这是有效的,但前提是lib已经加载,并且无论您在运行时还是编译时“导入”什么都是有意义的。对于lib的导入,这可以正常工作,但只影响将来的
require
(或
eval“use…”
)调用。对于其他软件包,如果您试图导入函数之类的东西,这可能是毫无意义的,特别是如果这些函数具有影响编译时分辨率的原型。

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


只需执行
lib->import(EXPR)
即可完成相同的操作,但如果lib.pm尚未加载,则不会执行任何操作。(如果没有这样的子项,对import()或unimport()的方法调用将被忽略),但它将在运行时执行,除非您在BEGIN块中有它,这意味着对@INC的更改将不会及时执行以影响以后的
使用

谢谢这非常有用。
use lib $FindBin::Bin;
BEGIN { require "lib.pm"; lib->import($FindBin::Bin); }