in reply to Perl Signals
there is no need for "$SIG{"INT"} = "interrupt";" within interrupt() subroutine. I would take that out.
the signal name should be first arg when interrupt() is called. So you can set up one interrupt routine that handles multiple signals (don't strictly need one handler per signal).sub interrupt { my $sig_name = shift; print "You can't kill me! $sig_name caught"; }
In Section
Seekers of Perl Wisdom