RE: [MacPerl] Launching a script from another script??

[Chris Nandor <pudge@pobox.com>]

Changing only using DPLX instead of RCTL, and with a test script that looks
like this:

#!perl -w
while (<STDIN>) {
    print;
    last;
}
print "Done!\n";
print @ARGV;

I got this back:

HandleSASE: event: McPL\SASE{WANT:['----'], DONE:bool(«00»), &inte:cans,
&timo:3600}
evt: misc\dosc{'----':[alis(...), ³a², ³b², ³c²], MODE:DPLX, &inte:cans,
&timo:3600}
rep: aevt\ansr{}
sdevt: McPL\DATA{'----':³This is test input.
²}
HandleSASE: event: McPL\SASE{'----':³This is test input.
Done!
abc², DONE:bool(«01»), &inte:cans, &timo:3600}
rep: aevt\ansr{WANT:['----'], DONE:bool(«00»)}
No response!


I think that is pretty much what you want.  Note that I could not figure
out how to send an EOF either, so I avoided the problem.  I would think it
should find it by itself, but it didn't seem to.

--
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10  1FF77F13 8180B6B6'])

===== Want to unsubscribe from this list?
===== Send mail with body "unsubscribe" to macperl-request@macperl.org