CPAN RT

tk_sleep

    $top->tk_sleep($s);

Sleep $s seconds (fractions are allowed). Use this method in Tk programs rather than the blocking sleep function. The difference to $top->after($s/1000) is that update events are still allowed in the sleeping time.