这个use的用法是什么意思？

johnrobbet

今天看代码，看到一段：

use lib File::Spec->catdir( File::Spec->rootdir(), 'lib' ); use lib File::Spec->catdir( File::Spec->rootdir(), 'lib', 'inc' );

查了一下，
    File::Spec->catdir用来连接两个或多个目录名，形成完整的路径，该路径以目录结尾，并从结果字符串中删去位于末尾的斜杠，File::Spec->rootdir()返回表示根目录的字符串，在UNIX上是“/”。
   那么请问这个use lib是什么意思呢？谢谢！


[ 本帖最后由 johnrobbet 于 2009-2-2 11:17 编辑 ]

cobrawgl

告诉 perl 你要用的 lib 在哪里啊

johnrobbet

原帖由 cobrawgl 于 2009-2-2 11:23 发表
告诉 perl 你要用的 lib 在哪里啊

可以这么理解吗，就是use lib后面指定的所有路径下的所有lib全都use进来？

flw

perldoc lib

johnrobbet

明白了，相当于push @INC, DIR_LIST
多谢两位！

flw

是 unshift 不是 push

johnrobbet

Saying

       use lib LIST;

   is *almost* the same as saying

       BEGIN { unshift(@INC, LIST) }

在编译的时候就改变@INC

MMMIX

原帖由 johnrobbet 于 2009-2-2 13:01 发表
Saying

       use lib LIST;

   is *almost* the same as saying

       BEGIN { unshift(@INC, LIST) }

在编译的时候就改变@INC

嗯，不要忘了外面这个 BEGIN {}, 有和没有是有差别的。