在 Perl 中获得微秒级的时间间隔

在 Perl 中获得微秒级的时间间隔:

1 use Time::HiRes qw(usleep);
2
3 {
4 local $| = 1;
5
6 for (0 .. 9)
7 { usleep(9999); print "Cool LaTeX!\n" }
8 }