in reply to network socket EOF
If IO::Socket doesn't have a timeout option for the operation you're doing, look at perldoc -f alarm - but wouldn't it really be easier to use LWP::Simple or LWP::UserAgent?