如何在我们自己的 perl 脚本中导入多个自定义模块？答案

【问题标题】：how to import multiple custom modules in our own perl script?如何在我们自己的 perl 脚本中导入多个自定义模块？
【发布时间】：2012-04-03 12:40:23
【问题描述】：

我说过 100 个自定义包，例如（file1.pm、file2.pm、file3.pm、file4.pm、file5.pm、file6.pm）

每个文件包含一个函数。

我想在每个简单的 perl 脚本中导入所有内容。如何以简单的方式导入它们。请建议任何最简单的方法？

【问题讨论】：

听起来你真的应该重构以将它们放入逻辑模块而不是拥有大量的单个函数文件。
你能给我一个简单的例子吗？？？？？？
重构一些我看不到的代码的简单示例，这对我一无所知？没有。

标签： perl perl-module

【解决方案1】：

您可以使用这个小脚本将所有 100 个模块加载到其中：

# pragma
use strict;
use warnings;

# standard modules needed by the script
use Module::Load;

# the loop below loads all 100 of your custom modules (file1.pm, file2.pm, ...)
foreach my $i (1 .. 100)
{
    load "file$i";
}

【讨论】：

不工作说“在“load”file$i“附近的操作员预期的位置找到字符串{你需要预先声明加载吗？}
Module::Load 是“要求”，而不是“使用”。在某些情况下，差异可能很重要。
@user970553 抱歉，use 是小写字母，不是大写字母。我编辑了我的答案。它现在应该可以工作了。

【解决方案2】：

正如我在评论中所说，我认为这是一种组织代码库的糟糕方式。但假设您对此无能为力，您可能需要查看Toolkit 模块。

【讨论】：