Re: [MacPerl] anakin.pl: A MacPerl PUN

[strider corinth <corinth@mail.com>]

>#!perl -w
>
>use strict;
>use Mac::Apps::Launch;
>
>if (IsRunning('OB1K')) {QuitApps('OB1K')}
>
>MacPerl::Quit(3)
>
>__END__
>
>Okay folks,  I know what this does, 'cause I wrote it.  You figure it out.

Just a guess, but I figure it kills ObiWan (the desktop help system by
Stairways). Am I right?

- strider( corinth );


--

  |
--+--       A thing is worth what someone is willing to pay for it.
  |
  |



# ===== Want to unsubscribe from this list?
# ===== Send mail with body "unsubscribe" to macperl-request@macperl.org