sub timer_callback {
    $condvar->lock();
    # ...
    $condvar->unlock();
}