Как заставить выполнить определённую команду (откат) при получении скриптом сигнала "остановки" (Ctrl+C)?
$SIG{INT} = sub { do_some_think }man perlipc раздел Signals
man perlipc раздел Signals