[Translted]Linux FAQs with Answers--How to catch and handle a signal in Perl