FindBin用于驻留在我脚本目录中的perl模块

Question

我有一个脚本，它使用标准Perl库外部的模块，并希望以某种方式使用它们。我没有权限将它们安装到Perl lib目录中，并且想知道我是否可以将这些外部模块驻留在我的脚本目录中。

我已阅读有关使用FindBin的内容，但似乎无效。我正确使用它吗？

现在我想使用我想要使用的3个模块（2个是目录）。所以假设我的脚本在Dir1中，那么我的模块将位于Dir1的子目录中，称为Dir2。

所以假设FindBin找到了Dir1，那我所要做的就是这个吗？

use FindBin '$Bin';
use Dir2 "$Bin/Dir2";
use Dir2::SubDir_ofDir2_1::Module1;
use Dir2::Module2;
use Dir2::Module3;

我的程序似乎运行但它没有做任何事情。所以我很确定它没有正确导入模块。

由于

Answer 1

这样做的正确方法更可能是：

use lib "$FindBin::Bin/Dir2";
use SubDir::Module1;

或：

use lib $FindBin::Bin;
use Dir2::Subdir::Module;

两者都会找到文件，行为将取决于模块是否将自己声明为package Dir2内部。

查看FindBin和lib的文档。