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

Reply via email to