在本地使用 XML::Twig 而无需在 Perl 中安装

Question

我用 Perl 编写了一个相对较大的脚本。它的一部分现在应该能够操作 XML 数据。据我所知 XML::Twig 将是这种操作的合适模块。由于完成的程序没有在我的机器上运行并且我无法在目标系统上安装额外的包，我决定在本地使用 XML::Twig。因此，我将其复制到脚本的子文件夹中，并使用 use lib "$FindBin::Bin/foreign/"; 加载它（Twig.pm 在路径 foreign/XML/Twig.pm 下找到）和 use XML::Twig;。

在我的 Windows 7 机器上，它运行良好。现在我在Linux环境（Ubuntu）上试了一下，以后需要，报错如下：

在@INC 中找不到模块 XML::Parser::Expat 的可加载对象

我真的不想编写自己的库，而且我无法在这个系统上安装额外的包（但它应该在这种情况下工作）。我们将不胜感激每一个建议。

Answer 1

您不仅需要在本地复制 XML::Twig，还需要 Twig 使用的所有其他非核心模块（以及由 Twig 使用的模块等使用）。

它可能在您的 PC 上运行的一个原因是您在该 PC 上安装了 XML::Parser::Expat，但它不在 Linux 机器上。将此（以及所有其他依赖模块）包含在您的“外部”文件夹中，您可以创建脚本+模块的“可移植”版本。

为了回答操作员对这个初始帖子的后续评论，XML::Parser::Expat 不是 XML::Parser 的一部分，它是独立的。请参阅我的 XML::Parser 副本开头的这一部分：

BEGIN {
  require XML::Parser::Expat;
  $VERSION = '2.41';
  die "Parser.pm and Expat.pm versions don't match"
    unless $VERSION eq $XML::Parser::Expat::VERSION;
}

Answer 2

缺少一些 XML::Parser::Expat。重新安装它。

它是 CPAN 上 XML-Parser 分发的一部分。按照 README 文件中的说明进行操作。