Theat's the part that's untested. Damn, I remembered the colon, but forgot that wat's after it is frequently some number that would be silly at best as a port number. (I think I confused it with the way X connections tunneld in ssh look in netstat output, which is on the order of localhost:6012). DRAT!

Given a correct IP and port, the rest of the code should be good because it's extracted from code I actually use. But the ($addr, $port) = split(/:/, $ENV{DISPLAY}) is almost certain not to yiled a good port.

--Bob Niederman, http://bob-n.com