Mac::Carbon includes MacPerl.pm, which has some of the same functions as 
the MacPerl version: primarily convenience functions like SetFileInfo, 
GetFileInfo, and DoAppleScript.

There's a Mac::AppleScript module that has a RunAppleScript, which is 
mostly like DoAppleScript; the only real difference is in the error 
value in $@.  RunAppleScript outputs errOSAScriptError for every failed 
compilation (which is a bit unuseful, but I figure it could be changed 
... Dan?).  DoAppleScript puts the text of the error in there.

  $ perl -MMacPerl=:all          -le 'DoAppleScript ("asd"); print $@'
  The variable asd is not defined
  $ perl -MMac::AppleScript=:all -le 'RunAppleScript("asd"); print $@'
  -1753
  $ macerror -1753
  Mac OS error -1753: (errOSAScriptError)

Anyway, before people started asking, that's the only real difference, 
that I can see.

-- 
Chris Nandor                      [EMAIL PROTECTED]    http://pudge.net/
Open Source Development Network    [EMAIL PROTECTED]     http://osdn.com/

Reply via email to