Signal::Pending - Signal pending status made easy
use Signal::Mask;
use Signal::Pending;
{
local $Signal::Mask{INT} = 1;
do {
something();
} while (not $Signal::Pending{INT})
}
#signal delivery gets postponed until now
Signal::Pending is an abstraction around your process'/thread's pending signals.
It can be used in combination with signal masks to handle signals in a
controlled manner. The set of pending signals is available as the global hash
%Signal::Pending.
Leon Timmermans <fawaka@gmail.com>
This software is copyright (c) 2010 by Leon Timmermans.
This is free software; you can redistribute it and/or modify it
under the same terms as the Perl 5 programming language system itself.