¿Cómo puedo dormir durante un milisegundo en Perl?

Question

¿Cómo puedo dormir por menos de un segundo en Perl?

Answer 1

Desde la página Perldoc en sleep:

Para retrasos de granularidad más fina que un segundo, el módulo Time::HiRes (de CPAN, y partiendo de Perl 5,8 parte de la distribución estándar) proporciona usleep().

En realidad, se proporciona usleep() (que duerme en microsegundos) y nanosleep() (que duerme en nanosegundos). Es posible que desee usleep(), lo que le permitirá lidiar con números más fáciles. 1 milisegundo sueño (utilizando cada uno):

use strict; 
use warnings; 

use Time::HiRes qw(usleep nanosleep); 

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

Si no quiere (o no puede) cargar un módulo para hacer esto, es posible que también será capaz de utilizar el incorporado en select() función:

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

Answer 2

Time :: HiRes:

use Time::HiRes; 
    Time::HiRes::sleep(0.1); #.1 seconds 
    Time::HiRes::usleep(1); # 1 microsecond. 

http://perldoc.perl.org/Time/HiRes.html

Answer 3

Uso Time::HiRes.

Answer 4

Un rápido google en "perl alta resolución temporizadores" dio una referencia a Time::HiRes. Tal vez eso es lo que quieres.

Answer 5

de perlfaq8:

---

¿Cómo puedo dormir() o alarma() por menos de un segundo?

Si desea una granularidad más fina que el 1 segundo que proporciona la función sleep(), la forma más fácil es usar la función select() como se documenta en select in perlfunc. Pruebe los módulos Time :: HiRes y BSD :: Itimer (disponibles en CPAN, y a partir de Perl 5.8 Time :: HiRes forma parte de la distribución estándar).

Answer 6

system "sleep 0.1"; 

hace el truco.