llancet has asked for the wisdom of the Perl Monks concerning the following question:
I want to use them, because according to the document, SIGRTs can be queued while multiple signals come. However, the program just exit:
send him a min+5#!/usr/bin/perl use common::sense; use Glib qw/TRUE FALSE/; $SIG{'SIGRTMIN+5'} = \&on_sig; my $loop = Glib::MainLoop->new( 'default', FALSE ); $loop->run; sub on_sig { my $sig = shift; say "somebody told me $sig"; }
Why?$ ./t_signal.pl & [2] 3305 $ kill -s SIGRTMIN+5 3305 $ [2]+ Real-time signal 5 ./t_signal.pl $
Back to
Seekers of Perl Wisdom