re: [MacPerl] Send Arg to MacPerl from AS

[PTATTERS@astral.magic.ca (Peter Tattersall)]

schinder@pjstoaster.pg.md.us (Paul Schinder) wrote

>Do Script wants a string, but Applescript doesn't do string interpolation
>the way Perl does.  You have to do it the Applescript way:

I've been corresponding with Chris directly. I've been using

  tell application "MacPerl"
      set howie to Do Script {file "Fat Man:MacPerl Ä:Dumb show","arg0","arg1"}
  end tell
followed by
  display dialog howie --display reply from MacPerl

as the AppleScript to test and the MacPerl script

#! perl
require "GUSI.ph";
&MacPerl'Reply("This is what you said: $ARGV[0] and $ARGV[1].");

This combination works for me under 5.07 and 5.1. Chris gets no reply in
the AppleScript.

Chris says print messages inserted into the MacPerl script show the script
is invoked, but still nothing gets back.

Any thoughts?

Peter Tattersall                           Behold the happy moron
Perk Consulting                            He doesn't give a damn
ptatters@astral.magic.ca                   I wish I were a moron:
http://www.magic.ca/~ptatters/rolling.html My God! Perhaps I am!