perl module to test tcp connections.