正如许多 Perl 开发人员所知,unbless用于从对象中删除祝福。
我试图通过调查它的实现来了解它是如何在内部工作的。
我试图在它的包Data::Structure::Util中检查它的实现。这是来源:
sub unbless {
unbless_xs( $_[0] );
}
我在哪里可以找到unbless_xs
子实现/源?
如果您Data::Structure::Util
在 metacpan.org 上查找,您会在左侧看到一个浏览链接,让您可以探索发行版的内容
这同样适用于任何 CPAN 模块:无需下载即可检查源代码。在这种情况下,您将Util.xs
在结构的根部找到
如果您愿意,您可以在 CPAN 站点上执行相同的操作,search.cpan.org
但您必须升级到(当前)Data-Structure-Util-0.16 分发版才能找到浏览链接