#!/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().
Copyright © 2002 O'Reilly & Associates. All rights reserved.