perl - 如何在 Perl 中休眠一毫秒？

Question

如何在 Perl 中休眠少于一秒？

Answer 1

来自 sleep 上的 Perldoc 页面:

For delays of finer granularity than one second, the Time::HiRes module (from CPAN, and starting from Perl 5.8 part of the standard distribution) provides usleep().

实际上，它提供了usleep()(以微秒为单位休眠)和nanosleep()(以纳秒为单位休眠)。您可能需要 usleep()，它可以让您处理更简单的数字。 1 毫秒 sleep (使用每个):

use strict;
use warnings;

use Time::HiRes qw(usleep nanosleep);

# 1 millisecond == 1000 microseconds
usleep(1000);
# 1 microsecond == 1000 nanoseconds
nanosleep(1000000);

如果您不想(或不能)加载模块来执行此操作，您也可以使用内置的 select()功能:

# Sleep for 250 milliseconds
select(undef, undef, undef, 0.25);