當用戶在Perl中讀取輸入時，如何讓Perl不顯示「終止於信號SIGINT（2）」？

Question

我對Perl非常陌生，目前我正在使用ActiveState Perl在Windows 7上學習它。這是我的程序。

chomp(my @lines = <STDIN>); 

foreach (sort @lines) { 
    print $_; 
} 

運行程序時，我輸入字符串的一些線，然後按Ctrl鍵+Ç到告訴我已經完成打字程序。但是，在得到我的結果（從print $_;生成）後，我也收到了此消息：終止於信號SIGINT（2）。如何禁用此消息？

謝謝。

Answer 1

對於Windows，以表示行按Ctrl + Z其次Enter

按Ctrl + C發送中斷信號到你的程序，它是Terminating on SIGINT消息你看到事業的終結。

Answer 2

在Linux中，按CTRL + d（EOF），而不是CTRL + Ç

Answer 3

您可以處理信號，這樣的：

$SIG{INT} = sub { print("Caught SIGINT but continue!\n"); }; 

的鍵盤中斷。這是一個例子。