Just a few updates to what you say here ...
At 16:02 -0800 2002.03.11, Daschbach, John L wrote:
>&MacPerl'DoAppleScript("${script}");
A much better way to do this is:
MacPerl::DoAppleScript($script);
' instead of :: as package separator was deprecated a long time ago. You
don't need to put a variable in quotes, and when you do, you don't need to
put the variable name in braces, unless it is to differentiate it from
something else. The "&" is also unnecessary.
No big deal, but I figured I'd mention those while I was here. :)
>I have found that calling Applescript from MacPerl often leads to the
>application not being found. In Applescript this only occurs the first time
>a script is run (as I recall) but it always occurs when calling from
>MacPerl. The work around for this that I have used is the following.
>
>$script = "tell application \"Finder\" \n";
>$script .= " open application file id \"SIT!\"\n";
>$script .= " set appName to name of result\n";
>$script .= "end tell\n";
A faster way to do this is simply:
use Mac::Apps::Launch;
LaunchApps('SIT!');
--
Chris Nandor [EMAIL PROTECTED] http://pudge.net/
Open Source Development Network [EMAIL PROTECTED] http://osdn.com/
