快速perl sigint处理程序

Ste*_* Lu 3 perl

在接收Ctrl + C时,处理程序清理最方便,最清晰的方法是什么?

例如,当我的套接字服务器以这种方式被杀死时,TCP套接字永远不会被关闭.我希望在程序顶部放置一个很好的衬管,以便在终止程序之前设置一个sigint处理程序(或类似atexit之类的东西)来关闭某些套接字(或进行任何其他类型的清理).

mus*_*iKk 6

通过%SIG散列分配信号处理程序可以轻松处理信号.更多细节可以在perlipc找到.

  • 一个简单的例子:$SIG{INT} = sub { print "oops" }; (2认同)

dax*_*xim 6

不能比sigtrap更快,更方便或更清晰.