my $w;
sub {
...
    $w = AnyEvent->timer(
    ...
}