I'm interested in writing a X server in perl/Tk (unless someone can point me to an existing one). I figure that since Tk already has bindings for X events it shouldn't be too difficult to write a server to accept incoming connections and pass the incoming event stream to Tk. What I'm trying to locate is documentation on how perl and Tk communicate. I've looked through the source code for the Tk module but I can't tell where the X events are created. Any help would be appreciated. Thanks, CAK.