前端之家收集整理的这篇文章主要介绍了
perl – 为什么我需要在使用eval之前本地化$@?,
前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我知道$@是一个
全局变量这一事实,我仍然无法弄清楚为什么我需要在使用
eval之前对其进行本地化:
例如:
eval { SOME_FUNC_THAT_MAY_DIE(); };
if ($@) {
print "An error occured!\n";
}
我能想到的唯一可能的事情是,如果某个信号处理程序在尝试读取$@的同时调用die,我在这里缺少什么?
在
调用eval之前说出本地$@的原因是为了避免踩到你的来电者的$@.子程序改变任何
全局变量是非常粗鲁的(除非这是子程序的既定目的之一).对于顶级
代码(不在任何子例程中),这实际上不是问题.
此外,在较旧的Perl上,在对象销毁期间调用的任何eval都会破坏全局$@(如果对象因为从eval块抛出异常而被销毁),除非$@首先被本地化.这是fixed in 5.14.0,但许多人仍在运行旧的Perls.
原文链接:https://www.f2er.com/Perl/171720.html