You could try using a non-blocking TCP socket (there were some recent threads regarding how to use them under Win32) or you could even resort to UDP sockets.
I don't know how satisfactory you think these solutions are, but I think that rolling up a socket implementation this way shouldn't be very hard.
acid06
perl -e "print pack('h*', 16369646), scalar reverse $="