Perl для системного администрирования




Управление процессами в MacOS - часть 2


$psn, $name

Результат таков:

Process Serial Number Process Name

8192 FaxMonitor

8193 Queue Watcher

8194 Finder

8195 Serial Port Monitor 8198 MacPerl

Теперь, когда вы знаете, какие процессы у вас запущенны, совершенно естественно попытаться ими управлять. К сожалению, здесь практически ничего нельзя сделать. Самое большое, на что мы способны, - это перевести процесс в интерактивный режим при помощи SetFrontProcess($psn). У нас даже нет возможности напрямую его завершить (Perl-функция kill() не реализована). Лучшее, что можно сделать, послать выполняющемуся приложению событие AppleEvent, чтобы сообщить, что процесс должен быть завершен. Самый простой способ сделать это - применить модуль Mac: :Apps: : Launch Криса Нандора (Chris Nandor). В нем есть функция QuitApps(), которая позволяет завершить работу приложения, располагая его ID. В Мае:: Apes: . Launcn есть еще несколько полезных функций для запуска приложений и перевода их из/в интерактивный режим. Делается это так же, как и при использовании Мае: :Processes.

Теперь наступает время операционной системы, в которой управление процессами менее ограничено.




Содержание  Назад  Вперед