in reply to An IO::Sockets 'test for live connection' question:

if you're on a linux box, try 'netstat'. in order to get a continuous output for all tcp/ip sockets, type 
netstat -tc

[download]

In Section Seekers of Perl Wisdom