mattk has asked for the wisdom of the Perl Monks concerning the following question:
Given this piece of code:
Each signal handler works, but only once. After that type of signal has been delivered, that signal ceases to have an effect. Why is this so? Edit: My test code was basically the same as sh1tn's, and I get this output, from perl v5.8.1-RC3, running under OS X 10.3.8:$sub = sub { exec "perl $0" }; $SIG{INT} = $sub; $SIG{USR1} = $sub; print ++$counter while 1;
[matt@powerbook test] perl 440900.pl 1 2 3 4 ^C1 2 3 4 ^C5 ^C^C6 ^C^C7 ^C8 ^Z [1]+ Stopped perl 440900.pl
Back to
Seekers of Perl Wisdom