shell - $SIG {'ALRM' } 在 Perl 中做什么

Question

我对shell 脚本编写 和Perl 很陌生，我正在尝试将Perl 脚本转换为Python脚本。

我遇到了下面的代码片段，但我并不清楚。

sub sigalrm_handler
{
  printf (STDOUT "Timeout: Timeout Error Occured.\n");
  kill (1, $proc);
  exit (1);
}

sub main
{
  ...
  ...
    $SIG{'ALRM'} = \&sigalrm_handler;
    alarm ($ARGV[0]);
    shift @ARGV;

    $proc = spawn (@ARGV);
    wait;
    exit ($?);
  ...
  ...
}
main ()

这个 $SIG{'ALRM'} 命令会做什么？它是 Python 中的某种特殊关键字吗？

我看到很多来源都在使用 $SIGALRM 但没有找到任何来源提到为什么像 $SIGALRM 一样使用它只是为什么不其他名字。

这个 $SIG{'ALRM'} 的值在那个赋值之后会是什么？

谁能帮我理解这段代码？

Answer 1

%SIG 散列为 Unix 信号设置信号处理程序。当内核向 Perl 进程发送信号时，将调用信号处理程序。

alarm函数指示内核在 n 秒后发送信号。然后将调用 $SIG{ALRM} 处理程序并执行它的操作。

在您的特定情况下，信号处理程序将打印 Timeout: Timeout Error Occured. ，终止存储在 $proc 中的 PID，然后退出程序。

Python 等价物可能是 signal或 signal适用于 Python 3。