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的文档。