perl-Time-Out

Easily timeout long running operations

The 'Time::Out' module provides an easy interface to alarm(2) based timeouts. Nested timeouts are supported. The module exports the 'timeout()' function by default. The function returns whatever the code placed inside the subroutine reference returns: use Time::Out qw( timeout ); my $result = timeout 5 => sub { return 7; }; If 'Time::Out' sees that Time::HiRes has been loaded, it will use that 'alarm()' function (if available) instead of the default one, allowing float timeout values to be used effectively: use Time::HiRes qw(); use Time::Out qw( timeout ); timeout 3.1416 => sub { };