#!/usr/local/bin/perl -w
use Time::HiRes qw(usleep);
my $ms = 349_000; # That's 349,000 microseconds
usleep($ms);
print "I'm awake now.\n";
Time::HiRes implements a Perl interface to
usleep(), ualarm(),
gettimeofday(), setitimer(),
and getitimer().
 |  |  |
8.223. Time::gmtime |  | 8.225. Time::Local |