加载模块时 perl 的包含路径中的搜索顺序是什么

Question

假设 @INC 中有三个路径：path1、path2 和 path3。在每个路径下，都有一个名为 foo.pm 的模块。如果我现在通过 use foo; 在我的脚本中加载 foo.pm，那么实际上会加载哪个 foo.pm ？或者换句话说，perl 在 @INC 中搜索路径的顺序是什么？

Answer 1

perldoc -v %INC 显示选择的路径：

use Data::Dumper; 
print Dumper(\%INC);

或者...

perl -Mfoo -e 'print $INC{"foo.pm"}'

require 显示一些隐含搜索顺序的伪代码：

foreach $prefix (@INC) {
}

因此，path1会首先被搜索。

Answer 2

路径1、路径2、路径3。 Perl 将加载 path1/foo.pm。

你为什么会期望它是其他的？

看看 perlfunc perlvar，我可以看到它们不没有明确这么说，但他们确实说：

数组 @INC 包含 do EXPR 、 require 或 use 结构查找其库文件的位置列表。

我认为那里的提示是列表。期望从头到尾处理列表是很正常的。

您可以将此代码放在 use foo; 语句之前：

BEGIN { say "\@INC=(${\join( ', ', @INC )})"; }

如果仍然显示 @INC=(/path1, /path2, /path3) 则将此代码在 use 语句之后：

BEGIN { say "\$INC{'foo.pm'}=$INC{'foo.pm'}"; }

如果该语句仍然显示 $INC{'foo.pm'}=/path3/foo.pm，那么我认为您没有指定您的搜索路径以及您可能的搜索路径。您可能认为您在指定为“/path1”的同一目录中有 foo.pm，但很可能您的某些路径混乱了。