如何在 C 代码中构建 Perl 哈希？

Question

我希望在 Perl 中嵌入 C 代码。在这段 C 代码中，我想将一个大文件读入内存，进行一些更改并构建一个散列（自定义散列）。我希望可以从我的 Perl 代码访问这个哈希值。是否可以？我怎样才能达到目标？

Answer 1

为了将 c 嵌入到 perl 中，您需要 XS。有关详细信息，请参阅 perlxs 和 perlxstut。

至于从 C 构建 perl 数据结构，您必须使用 perlapi 处理哈希值。关于 XS 的许多文档已经解释了其中的各个部分。您要查找的重要部分是 newHV 和 hv_store。

这是一个类似于您可能想要做的事情的小（且完全未经测试）示例：

SV *
some_func ()
    PREINIT:
        HV *hash;
    CODE:
        hash = newHV();
        hv_stores(hash, "foo", 3, newSViv(42));
        hv_stores(hash, "bar", 3, newSViv(23));
        RETVAL = newRV_noinc((SV *)hash);
    OUTPUT:
        RETVAL

这是一个名为 some_func 的 XS 子例程，它将构建一个散列并将其引用返回到 perl 空间：

my $href = some_func();
# $href = { foo => 42, bar => 23 };

Answer 2

• 请参阅 内部结构和 C 语言
  接口
• 另请参阅 Inline-C 在 perl 中嵌入 C 代码： 内联模块允许您
  把其他的源代码放上来
  直接编程语言
  Perl 脚本或模块中的“内联”。
  代码自动编译为
  需要，然后立即加载
  从 Perl 访问。

另请阅读为什么我应该使用 Inline 来做到这一点？

Answer 3

您可以使用 SWIG 在 C、Perl 和其他几种语言之间进行交互。