perl - 如何以编程方式知道模块是否是核心模块？

Question

我有一个应用程序中使用的模块列表。我想测试这些模块是否是 Perl 核心的一部分（如果它们需要在应用程序部署期间安装在全新的服务器环境中）。

Module::CoreList 模块是测试这个的合适工具吗？如果不是，我应该如何处理？

Answer 1

下面将告诉您一个模块是否是正在使用的 Perl 版本的核心模块。

use Module::CoreList qw( );

if (exists $Module::CoreList::version{ $] }{'CGI'}) {
   print "yes\n";
} else {
   print "no\n";
}

请注意，它仅适用于发行版的“主”模块。