シグナルイベントハンドラでデータを出力しようとしていません

Question

私が取り組んでいるスクリプトからデバッグ出力を取得しようとしています。以下のコードは出力しません何らかの理由で何のために：

$SIG{'HUP'} = \&dump_state; 

sub dump_state {   
    print "dumping state: \n\n"; 
    debug(Dumper($state)); 
} 

私もINTとTERMシグナルでこれを試してみましたが、私は何も出力を取得していません。何が起こるのか？私は迷っている。

「debug（）」は、STDERRに色分けして印刷する小さなサブアプリケーションです。スクリプトのどこかで動作することが知られています。

Answer 1

あなたは単に間違った信号名を使用しようとしたと思います。 CTRL-Cをキャッチ

http://docstore.mik.ua/orelly/perl/cookbook/ch16_19.htm

はHUP信号INTはありません。

このコードは動作します：

use strict; 
use warnings; 

local $SIG{'INT'} = \&dump_state; 

my $i=0; 
while(1){ 
    $i++; 
    sleep(5); 
} 

sub dump_state {   
    print "dumping state: $i\n\n"; 

} 
./hup_test.pl 
dumping state: 1 

dumping state: 2 

dumping state: 3 

dumping state: 4 

dumping state: 5 

Killed