Chris Nandor <[EMAIL PROTECTED]> writes:
> At 21:49 +0900 2001.11.13, Nobumi Iyanaga wrote:
> >>
> >>use Mac::AppleEvents;
> >>my (%ae, $event, $reply);
> >>
> >>my $macro;
> >>$macro = 'Find/Replace "a" "b" "-g-SaA"';
> >>
> >>%ae = (
> >>target =>'NISI',
> >>class =>'aevt',
> >>id =>'dosc',
> >>params =>["'----':obj {want:type(cobj), " .
> >> "from:null(), form:enum(name), seld:TEXT(¥@)}",
> >> $macro]
> >>);
>
> I don't know what "¥" is supposed to be. That should be a "\". TEXT(@) is
> similar to sprintf(), in that it replaces that macro with whatever string
> you pass to it, properly formatted for an AE string. So the "\" just tells
> MacPerl to not treat the "@" as an array designator, but as a literal "@".
> Maybe you did use "\" but it just got messed up in the character set
> translation.
>
The Backslash and Yen-Sign (= an Y with two vertical strokes) have the
same code-point in 7-bit ASCII/ JIS-ROMAN. So if an American sees a
Backslash, Japanese users of MacPerl etc. may see a Yen-sign.
Andreas Marcel
