在关闭程序之前做一些事情

Question

我有一个使用Tk的perl程序.有没有选择创建一个perl脚本的"析构函数"？我的意思是例如我想在主窗口关闭之前关闭数据库并杀死子进程.

Answer 1

你可以使用一个END块

END { 
  print "before exit\n";
}