@INC 数组

beyes

@INC 是 Perl 内置的一个特殊数组，它包含指向库例程所在位置的目录路径，如果你包含的库并不在这些目录之下，那么可在命令行中使用 -l 选项开关，这点和 gcc 编译时使用 -L 和 -l 选项使用第三方库的行为有些类似。

可以用 perl -V 命令看到 @INC 数组的内容：

$perl -V
...

  @INC:
    /usr/local/lib/perl5
    /usr/local/share/perl5
    /usr/lib/perl5/vendor_perl
    /usr/share/perl5/vendor_perl
    /usr/lib/perl5
    /usr/share/perl5
    .

这样会输出许多信息。perl 命令的 -e 选项可以后接命令，这样可以单独的打印出 @INC 的内容：

$ perl -e 'print "@INC\n"'
/usr/local/lib/perl5 /usr/local/share/perl5 /usr/lib/perl5/vendor_perl /usr/share/perl5/vendor_perl /usr/lib/perl5 /usr/share/perl5 .

由上可见，@INC 数组最后一个元素是当前目录，如果我们希望将当前工作目录称为搜索路径中第一个元素，那么可以使用 unshift (@INC, "."); 来完成。