在Perl脚本结束之前始终执行一些代码

发布时间：2020-12-16 06:27:53 所属栏目：大数据来源：网络整理

导读：如何设置必须在Perl脚本停止之前执行的代码？在这里how to run piece of code just before the exit of perl script我读到了关于END子程序,但它只在脚本正常结束时执行.但是,如果用户通过^ C中止程序,我也希望执行代码. 解决方法捕获终止信号并重新路由它

如何设置必须在Perl脚本停止之前执行的代码？

在这里how to run piece of code just before the exit of perl script我读到了关于END子程序,但它只在脚本正常结束时执行.但是,如果用户通过^ C中止程序,我也希望执行代码.

解决方法

捕获终止信号并重新路由它们,以便最简单的方法：

$SIG{TERM} = $SIG{INT} = $SIG{QUIT} = $SIG{HUP} = sub { die; };

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!