3

Perlalarm()在 C for Linux 中的等价物是什么?AFAIK 在 Windows 中没有本机alarm功能,但 Perl 提出了一个我并不好奇的解决方法。

对于那些不知道的人alarmPerl 警报

编辑:我实际上需要毫秒精度的警报。我可以在线程中使用的那个(在多线程应用程序中)。

4

1 回答 1

2

就像是:

unsigned int alarm (unsigned int secs, unsigned int usecs) {
   struct itimerval old, new;
   new.it_interval.tv_usec = 0;
   new.it_interval.tv_sec = 0;

   // usecs should always be < 1000000
   secs += usecs / 1000000;
   usecs = usecs % 1000000;

   // set the alarm timer
   new.it_value.tv_usec = (long int) usecs;
   new.it_value.tv_sec = (long int) secs;

   // type ITIMER_REAL for wallclock timer
   if (setitimer (ITIMER_REAL, &new, &old) < 0)
     return 0;
   else
     return old.it_value.tv_sec;
 }

见:http ://www.gnu.org/software/libc/manual/html_node/Setting-an-Alarm.html

于 2013-06-24T05:08:43.860 回答