Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

difference sockets in Tk and Tkx

by momo33 (Beadle)
on Mar 19, 2011 at 08:08 UTC ( #894122=perlquestion: print w/ replies, xml ) Need Help??
momo33 has asked for the wisdom of the Perl Monks concerning the following question:

Hello Monks,

I try to get a Tkx application working with a socket. In Tk you can do this with

my $server = IO::Socket::INET->new( LocalPort => 7777, Type => SOCK_STREAM, Reuse => 1, Listen => 10 ); $mw->Tkx::fileevent($server, 'readable', sub { new_connection($server) + });
In Tkx fileevent would work like this
my $fh = Tkx::open("| @cmds <$null 2>\@1"); Tkx::fconfigure($fh, -blocking => 0); Tkx::fileevent($fh, readable => [\&readdata, $fh]);
A more complete application is being discussed in

does anyone know how to get a working socket system with Tkx?


Comment on difference sockets in Tk and Tkx
Select or Download Code
Replies are listed 'Best First'.
Re: difference sockets in Tk and Tkx
by Corion (Pope) on Mar 19, 2011 at 08:14 UTC

    I don't know neither Tk nor Tkx, but as a socket is a filehandle, you might be able to just give your socket handle to fileevent() in Tkx as well. What happened when you tried that?

      can not find channel named "IO::Socket::INET=GLOB(0x9184ed0)" at ./sps line 28. line 28: Tkx::fileevent( $server, readable => [\&new_connection, \$ser +ver] );
      Yes, I made the fileevent line Tkx-style.
Re: difference sockets in Tk and Tkx
by Anonymous Monk on Mar 19, 2011 at 22:57 UTC
        This may contain all information but my Perl and Tcl knowledge is insufficient to turn the info into working code. Sorry

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://894122]
Approved by GrandFather
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (6)
As of 2015-11-27 17:13 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (731 votes), past polls