At 10:18 -0700 2001.08.01, Alex wrote:
>can I mount a computer on a desktop from a perl
>script (I am looking for a way to do it without
>using 'chooser')? can I do it from any other
>tools such as MPW?
With Mac::Glue and Mac OS 9 (I think that is when mount_volume started
coming with Standard Additions):
#!perl -w
use Mac::Glue;
my $finder = new Mac::Glue 'Finder';
# TCP/IP
$finder->mount_volume('afp://williams');
# AppleTalk
$finder->mount_volume('Williams', on_server => 'Williams');
__END__
Note that my password is stored in the keychain, but you can also pass a
user_name and password, either as "afp://user:pass@host" (I think) or with
as_user_name => "user", with_password => "pass".
--
Chris Nandor [EMAIL PROTECTED] http://pudge.net/
Open Source Development Network [EMAIL PROTECTED] http://osdn.com/
