Stupid Carbon Tricks

| | Comments (0)
On the macosx@perl mailing list, it was asked how to quit an app. Many people suggested AppleScript. But, as I am fond of saying, I hate AppleScript. So:

#!/usr/bin/perl -w
use Mac::Processes;
while (my($psn, $psi) = each %Process) {
    next unless $psi->processName eq 'Mozilla';
    kill SIGTERM, GetProcessPID($psn);

Now Playing: What A Wonderful World - Russ Taff (A Christmas Song)

Leave a comment

<pudge/*> (pronounced "PudgeGlob") is thousands of posts over many years by Pudge.

"It is the common fate of the indolent to see their rights become a prey to the active. The condition upon which God hath given liberty to man is eternal vigilance; which condition if he break, servitude is at once the consequence of his crime and the punishment of his guilt."

About this Entry

This page contains a single entry by pudge published on December 11, 2002 6:07 AM.

No More TiVo was the previous entry in this site.

For the Record is the next entry in this site.

Find recent content on the main index or look in the archives to find all content.