关于perl里的alarm用法提问！

nathaniel

我想每隔固定的时候就alarm一次，但是我查alarm的用法时，写着只能alarm一次。
我想用alarm在固定的时间周期里循环调用函数，应该怎样做？？谢谢！

luoyong

用fork()再开一个进程不好么?

nathaniel

Post by luoyong
用fork()再开一个进程不好么?

但是我还是要在一个固定的时间（例如3秒）循环内来fork()一次，那么我怎样可以控制每3秒fork()一次呢？？谢谢！

luoyong

那就不要fork()了,用$SIG,这个是用来处理signal的,每次alarm系统都向程序发送一个名为ALRM的signal.

例子:

每秒打印一个"alarm"

2. #!/usr/bin/perl -W
4. $SIG{ALRM}=sub {print "alarm.\n";[color="red"]alarm(1)[/color]};
6. [color="red"]alarm(1)[/color];
8. while(1){}

复制代码

nathaniel

谢谢，解决了！