sub {
...
            my $w = AnyEvent->timer(
                after => 0,
                interval => 5,
                cb => sub {
                    $session->write('5 seconds have passed');
                    $w_cond->send();
                }
            };
}