| Как поставить обработчик вызываемый при аварийном завершении скрипта |
[исправить] |
sub my_die{
.....
}
local ($SIG{__DIE__}) = \&my_die;
local ($SIG{__WARN__}) = \&my_warn;
local ($SIG{INT}) = \&my_kill;
local ($SIG{TERM}) = \&my_kill;
die "test";
|
| |
|
|
27.08.2001
Ключи: test
/ Лицензия: CC-BY
|
| Раздел: Корень / Программисту и web-разработчику / Perl / Функции и модули в Perl |