perl中使用signal(信号)实例
使用signal,能让你的程序功能更丰富。要在Linux下列出所有的signal,利用kill-l即可。下面是我机器上的输出(后面还有到64的没列出来):
xuyang@xuyang-desktop:/$kill-l 1)SIGHUP2)SIGINT3)SIGQUIT4)SIGILL5)SIGTRAP 6)SIGABRT7)SIGBUS8)SIGFPE9)SIGKILL10)SIGUSR1 11)SIGSEGV12)SIGUSR213)SIGPIPE14)SIGALRM15)SIGTERM 16)SIGSTKFLT17)SIGCHLD18)SIGCONT19)SIGSTOP20)SIGTSTP 21)SIGTTIN22)SIGTTOU23)SIGURG24)SIGXCPU25)SIGXFSZ 26)SIGVTALRM27)SIGPROF28)SIGWINCH29)SIGIO30)SIGPWR 31)SIGSYS
其中每个signal在这里有介绍.
下面是一个例子,禁止ctrl+c(ctrl+c会产生一个INT信号给当前程序)来关闭当前程序
subINT_handler{
print("Don'tInterrupt!\n");
}
$SIG{'INT'}='INT_handler';#anotherwayis$SIG{'INT'}=\&INT_handler;
for($x=0;$x<10;$x++){ print("$x\n"); sleep1; }
热门推荐
10 圣诞祝福语简短小学
11 祖国七十华诞简短祝福语
12 老师送的祝福语简短
13 生日祝福语大全女生简短
14 祝女性生日祝福语简短
15 牛年女神节祝福语简短
16 情人表白祝福语简短大气
17 老公开业祝福语简短
18 官宣新年祝福语简短