sub go {

    my $self = shift @_;
    local $SIG{ALRM} = \&ti;

    eval {
...