perl expect.pm不是handeling信号

Question

我们使用sun机器，我们有一个以下的perl脚本，它工作正常但是当按下一个控件+ c或控件+ z时它会被杀死。因此，当我们在交互模式下使用Expect.pm时，如何捕获和忽略信号。

谢谢， SNK。

      #!/usr/bin/perl -w

      $SIG{'INT'}='IGNORE';
      $SIG{'TERM'}='IGNORE';

      use Expect;
      my $exp = Expect->spawn("gnuplot")
      or die "Cannot spawn  $!\n";

      $exp->interact();