Re: Re: Forking Issue

[larryl]

in reply to Re: Forking Issue
in thread Forking Issue

Or if you're fussy about the time interval:

use Time::HiRes qw(gettimeofday tv_interval);

my $t0 = [gettimeofday];
while (tv_interval($t0) < 1.23) {
   print "Yay!\n";
}