On connait l'astuce qui permet de faire dormir
un programme une fraction de seconde en utilisant
select(undef,undef,undev,0.2); . Mais Perl-5.8 propose un
mécanisme bien plus propre et plus court pour arriver au même
résultat via la module Time::HiRes .
Ce module propose quelques fonctions qui permettent de gérer le temps
avec une grande précision, mais surtout redéfinit des fonctions
standards qui ne savent habituellement gérer le temps que selon des
secondes entières, tel alarm() ou sleep .
Ainsi, pendant que les fonctions usleep et ualarm prennent
un argument exprimé en micro-secondes, les fonctions sleep et
alarm prennent un argument float .
use Time::HiRes qw(sleep); sleep(0.2);