Socket Timeout

Hi there folks

I am creating a socket to a remote server using PERL and while my message is transmitted, the socket on my machine closes/times out before I can get a response from the server. I have tried using sleep in my program, using a shutdown that closes only the write functionality while leaving the read alone and almost every other thing I can think of. Anyone have any suggestions/

Thanks

JV