Perl 中的 alarm函数

首页 / Perl入门教程 / Perl 中的 alarm函数

描述

此功能设置"警报",使当前进程在EXPR秒内接收到SIGALRM信号。如果省略EXPR,则使用$_的值。

实际的时间延迟并不精确,因为不同的系统实施警报功能的方式有所不同。实际时间可能比所请求的值多或少一秒。您一次只能设置一个闹钟计时器。如果计时器已经在运行,并且您对警报功能进行了新的调用,则警报计时器将重置为新值。通过将值指定为0,可以重置正在运行的计时器,而无需设置新计时器。

语法

以下是此函数的简单语法-

无涯教程网

alarm EXPR

alarm

返回值

该函数返回整数值,即。前一个计时器剩余的秒数。

以下是显示其基本用法的示例代码-

#!/usr/bin/perl

eval {
   local $SIG{ALRM}=sub { die "alarm\n" }; # NB:\n required
   alarm $timeout;
   $nread=sysread SOCKET, $buffer, $size;
   alarm 0;
};
if ($@) {
   die unless $@eq "alarm\n";   # propagate unexpected errors
      # timed out
} else {
   # didn't
}

祝学习愉快!(内容编辑有误?请选中要编辑内容 -> 右键 -> 修改 -> 提交!)

技术教程推荐

Vue开发实战 -〔唐金州〕

网络编程实战 -〔盛延敏〕

Swift核心技术与实战 -〔张杰〕

Service Mesh实战 -〔马若飞〕

软件设计之美 -〔郑晔〕

Go 并发编程实战课 -〔晁岳攀(鸟窝)〕

手机摄影 -〔@随你们去〕

大数据经典论文解读 -〔徐文浩〕

Web 3.0入局攻略 -〔郭大治〕

好记忆不如烂笔头。留下您的足迹吧 :)