Try unbuffering your filehandle ($socket). You may not be looping because you aren't getting enough data to fill your buffer.

Really, this is all conjecture, though.