быстрый Perl Sigint обработчик

Question

Каков наиболее удобный и понятный способ очистки программы при получении Ctrl + C?

Например, когда мой сокет-сервер уничтожается таким образом, сокет TCP никогда не закрывается.Мне бы хотелось, чтобы в верхней части программы был хороший вкладыш, чтобы установить обработчик sigint (или что-то вроде atexit) для закрытия определенных сокетов (или выполнения любого другого вида очистки) перед завершением программы.

Answer 1

Не может быть быстрее, удобнее или понятнее, чем sigtrap .

Answer 2

Обрабатывать сигналы легко, назначая обработчики сигналов с помощью хеша %SIG. Более подробную информацию можно найти на perlipc .