my $start = time; while ( (my $diff = time - $start) < 60) { sleep(60-$diff) } [download]
Dave.
In reply to Re: SIGCHLD and sleep() by dave_the_m in thread SIGCHLD and sleep() by overbyte