Perl中的弱引用
如何在perl中创建对象的弱引用,所以当对象超出范围时,引用计数被释放?
我已经尝试使用DESTROY子来打破循环引用. sub DESTROY{ my $p = shift; delete $p->{__tree__}; delete $p->{tokenizers}; delete $p->{toke}; } 请帮忙. 解决方法
你不能“调用”破坏 – 这里的问题是perl在引用计数上工作 – 对事物的每个引用都被计算,并且只有当引用计数降到零时才会被释放/销毁/垃圾收集.
DESTROY是一种特殊方法,在发生这种情况时,在对象内调用以执行清理任务.它不会删除对象,它只是让它在它死亡时做一些最后的整理. 看看
(编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |