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

前端之家收集整理的这篇文章主要介绍了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?

解决方法

根据 documentation

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

你有哈希哈希数组

猜你在找的Perl相关文章