Re: [MacPerl] LWP - close connection

[Chris Nandor <pudge@pobox.com>]

At 11.38 -0600 1999.11.10, Greenblatt & Seay wrote:
>Because my modem retains its connection after the MacPerl program has quit
>requiring me to be there to log off.

Assuming you are using Remote Access and have Remote Access Commands in you
Scripting Additions folder, and Mac::Glue is installed:

  use Mac::Glue;
  $f = new Mac::Glue 'Finder';
  $f->ppp_disconnect;

Or without Mac::Glue:

  MacPerl::DoAppleScript('ppp disconnect');

-- 
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10  1FF77F13 8180B6B6'])

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