Re: [MacPerl] Help with AppleEvents

["Ramesh R." <sram0mp@radon.comm.mot.com>]

Chris Nandor wrote
>First, you may want to consider using Mac::AppleEvents::Simple.  It does
>disposing and some of the contructing for you.
Downloaded it and tried it with the results described below. Thanks!

>This code:
>
>  seld:TEXT(\@)
>
>is kinda like %s in sprintf().  It says, take the next parameter in the
>list and use it as TEXT in seld.  So it takes "kocl:type(euMB)" as text.
>Instead, try this:
>
>		params => ["'----':obj{want:type(euMF), " .
>			"from:null(), form:enum(name), seld:TEXT(\@)}",
>			'', "kocl:type(euMB)"
>			]
>
>The added '' parameters should do it.
But when I add this parameter, I get the following error message

	# Too many arguments to AEBuildAppleEvent().

I tried "", " ", ' ', and even "\"\"".

I tried the following

#!perl -w

use Mac::AppleEvents::Simple;

my $obj = "'----':obj{want:type(euMF), " .
		"from:null(), form:enum(name), seld:TEXT(\@)}";
do_event(qw/core cnte CSOm/, $obj, '', "kocl:type(euMB)");

with the same results.

Removing the extra parameter, i.e.

do_event(qw/core cnte CSOm/, $obj, "kocl:type(euMB)");

generated the same AE as described yesterday, as expected. However, this
time the script just ends without printing the error number, which I
thought Simple was supposed to do.



Cheers,
Ramesh

`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`
    "When I use a word, it means just what I
     choose it to mean --neither more nor less."
          - Humpty Dumpty, in a rather scornful tone
            from Lewis Carrol's
           "Through the Looking Glass"
`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`~`



***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch