> можешь набросать тест который она не пройдет?

вместо 
    my $res = eval { dtimeout(1, sub { eval { sleep 3 }; return $_[0] }, 321) };
в t_timeout_eval
    my $res = eval { dtimeout(1, sub { eval { sleep 3 }; sleep 33; return $_[0] 
}, 321) };
подойдет?

-- 
Sincerely,
        Dmitry Karasik

--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить