I have a macperl script which has an applescript embedded in it and uses
MacPerl::DoAppleScript to execute it (see below). How can I accomplish the
same thing in Perl under OS X?
Code snippet:
$script = <<EOS;
set theCommand to {"$gsCommands1$newFileLoc $gsCommands2 $gsCommands3"} as
string
tell application "RackMac1:ghostscript:MacGS"
gs theCommand
end tell
EOS
$result = MacPerl::DoAppleScript($script) or die("Could not run script\n");
_________________________________________________________________
MSN Photos is the easiest way to share and print your photos:
http://photos.msn.com/support/worldwide.aspx