Perl - 使用指定子目录中的所有模块并自动解决它的依赖关系

Question

我有两个模块:

./My/Module1
./My/Module2

Module1 正在使用 Module2 中的子例程。所以在我的脚本中我输入了以下内容:

use My::Module1
use My::Module2

但这不起作用，并且 perl 提示 Module1 从 Module2 使用的子例程不存在。所以我在 Module1 中添加了以下行:

use My::Module2

最终这按预期工作了。

我想知道是否有一些解决方案可以包含指定子目录树中的所有模块并自动解决依赖关系。我不想在依赖于另一个模块的模块中键入 use 关键字。尝试了以下命令但没有奏效(语法错误或使用了错误的模块):

use My::;
use My::*;
use My;

另外我想问一下，这种交叉使用模块并调用它的子程序是否被认为是 perl 编程中的一个好习惯？

PS:@INC 包含当前目录，因此正在加载模块。

PPS:使用的模块 Exporter

Answer 1

I do not want to type use keyword in modules which depends on another modules.

然后键入 BEGIN、require 和 import 关键字？

说真的，没有什么好的方法可以让它发挥作用。只需在每个模块中使用 use，这样它就可以加载它需要的东西。

Also I would ask if this cross-using modules and calling it's subroutines is considered as a good practice in perl programming?

是的。模块化被认为是所有编程中的良好实践。