DragonFly On-Line Manual Pages

Munin::Common::Timeout(3)                  User Contributed Perl Documentation

NAME
       Munin::Common::Timeout - Run code with a timeout. May nest.

SYNOPSIS
        use Munin::Common::Timeout;

        do_with_timeout(50, sub {
            # ...
               do_with_timeout(5, sub {
                       # ...
                       # ...
               });
            # ...
        });

DESCRIPTION
       See also Time::Out, Sys::AlarmCall

SUBROUTINES
       do_with_timeout
            my $finished_with_no_timeout = do_with_timeout($seconds, $code_ref)
                or die "Timed out!";

           Executes $block with a timeout of $seconds.  Returns the return
           value of the $block if it completed within the timeout.  If the
           timeout is reached and the code is still running, it halts it and
           returns undef.

           NB: every $code_ref should return something defined, otherwise the
           caller doesn't know if a timeout occurred.

           Calls to do_with_timeout() can be nested.  Any exceptions raised by
           $block are propagated.

perl v5.20.3                      2015-11-05         Munin::Common::Timeout(3)