0

正如许多 Perl 开发人员所知,unbless用于从对象中删除祝福。
我试图通过调查它的实现来了解它是如何在内部工作的。
我试图在它的包Data::Structure::Util中检查它的实现。这是来源

sub unbless {
    unbless_xs( $_[0] );
}

我在哪里可以找到unbless_xs子实现/源?

4

2 回答 2

3

如果您Data::Structure::Util在 metacpan.org 上查找,您会在左侧看到一个浏览链接,让您可以探索发行版的内容

这同样适用于任何 CPAN 模块:无需下载即可检查源代码。在这种情况下,您将Util.xs在结构的根部找到

如果您愿意,您可以在 CPAN 站点上执行相同的操作,search.cpan.org但您必须升级到(当前)Data-Structure-Util-0.16 分发版才能找到浏览链接

于 2015-08-15T20:28:05.433 回答
2

它是用 C 实现的,您可以在https://metacpan.org/source/ANDYA/Data-Structure-Util-0.16/Util.xs#L239查看函数的来源

于 2015-08-15T20:13:08.030 回答