perl如何捕捉和处理sigpipe

Question

我想在收到sigpipe时调用子程序。我尝试过类似下面的内容：

$SIG{'PIPE'} = sub {
    print "Got sigterm \n";
};

然而，我一直收到错误：

Signal SIGPIPE received, but no signal handler set.

我可以$SIG{'PIPE'} = 'IGNORE'但是如何调用子程序

Answer 1

我认为在使用线程时该消息仅为issued。我相信抛出信号的线程与设置信号处理程序的线程不同。