I'm wondering if there's a way to configure a Perl Tkx app to also serve
as an XML-RPC server.
What I'm trying to accomplish is driving/scripting/sending messages to a
running Perl Tkx app that causes the Tkx app to run an operation, and
then return data to the client. The idea is to have the Tkx app serve in
a similar capacity to a COM server (think Excel) on Windows or an
AppleScriptable app on the Mac (think iTunes), which provide an
interface for external commands, but in a more platform- and
language-neutral way.
I'm currently using the RPC::XML::Server, which seems perfect for my
requirements in terms of simplicity but it seems that only one event
loop can run at a time--Tkx or the XML::RPC server. That's not
surprising, but I do wonder if there are any other CPAN modules that
might serve here, or if there is a way to layer the XML::RPC bits over
Tk's event loop.
Ruby has a module called "distributed Ruby" (drb) in its core that
allows a Ruby program to send messages to a running instance of another
Ruby program, even one running Tk; it's really cool. I'd love to see
something similar in Perl, and suggestions are appreciated.
--Kevin
--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com