perl – 复合哈希是否有Hash :: Util替代方案？

概述我有一个复合hashref如下 my $ch = { k1 => [ { k=>1 }, { m=>2 } ], k2 => [ { l=>90}, ... ],}; Hash :: Util :: lock_hashref_recurse($ch)无法有效锁定这些值. @ {$ch-> {k1}} [0] – > {k} =’新值’;被允许 ！我如何完全锁定这样的hashref 我有一个复合hashref如下

my $ch = {    k1 => [ { k=>1 },{ m=>2 } ],k2 => [ { l=>90},... ],};

Hash :: Util :: lock_hashref_recurse($ch)无法有效锁定这些值.

@ {$ch-> {k1}} [0] – > {k} =’新值’;被允许 ！我如何完全锁定这样的hashref？

解决方法 根据 documentation：

此方法仅递归到另一个哈希引用的哈希.因此,散列哈希(HoH)将全部受到限制,但哈希散列数组(HoAoH)将仅限制顶部散列.

你有哈希哈希数组

总结

以上是内存溢出为你收集整理的perl – 复合哈希是否有Hash :: Util替代方案？全部内容，希望文章能够帮你解决perl – 复合哈希是否有Hash :: Util替代方案？所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。