Рубрика: perl
Как проверить запущен ли perl скрипт?
Среда, 17 Авг 2011 11:54 Комментарии отключеныОчень актуальный вопрос, особенно когда планируется запуск скрипта для обработки какой-либо продолжительной задачи, по расписанию. Рекомендую давно проверенную функцию для unix систем. Функция требует модуля: File::IO; (входит в стандартный дистриб). Вызывать функцию необходимо в самом начале скрипта (сразу после загрузки модулей), так: use IO::File; openPidFile(’.mypid’); sub openPidFile { my $file=shift;# имя pid файла return 0 [...]