是否可以根据条件语句加载列表 perl 模块？

Question

（问错了请指正）

我正在制作一种 standard/generic 方法来简化我在 linux 中使用 perl 制作的所有 scripts/app。

我已经找到了创建标准子例程并从执行我想要的大部分标准作业的文件中调用它们的解决方案（变量 declarations/checkers/etc）。

现在我遇到的最后一个问题是如何调用不同的模块集（tk、dbi 等），我只需要从文件中调用它们。不仅如此。我制作了将激活我的 standard/generic 子例程中的内容的标志，现在我还希望在仅激活基于该标志的模块列表时应用该条件。

意思是根据我声明的标志，只有那些需要激活的模块列表才会被激活。

怎么做？ :)

其他详细信息。

不是使用 .pm 制作的模块，而是 Perl 模块，例如：

use Net::Domain qw(hostname hostfqdn hostdomain);
use Time::Local;
use Time::Piece;
use Switch;
use Exporter;
#use strict;

use File::Basename;
use Data::Dumper qw(Dumper);

use Time::Local;                                      
use Time::Piece;
use Time::Seconds();                                     

use Tk;
use Tk::BrowseEntry;
use Tk::Balloon;                                 
use Tk::widgets qw(Checkbutton BrowseEntry);          
use Tk::NoteBook;                                     
use Tk::Pane;   
use Tk::Photo;

Answer 1

您可以自由使用 'require'，它仅在控件在运行时到达它时才进行评估 - 与在 BEGIN { } 中提取的“使用”不同。

是否可以根据条件语句加载列表 perl 模块？

It is possible to load list perl modules depending on conditional statements?

linux

perl

module