Perl - Sockets y recv

Hola, tengo un problema a la hora de recibir datos a traves de los sockets

Estoy programando CGI sicript y todos los datos los imprimimo en el navegador.

Me conecto al servidor, preparo buffer, inicializo buffer y despues llamo a la funcion recv en donde le especifico el tamaño en bytes.

Pues mi problema no se donde radica. Unas veces recibo toda la informacion y en otras ocasiones solo parte de ella. Segun le da, y creo que el problema puede estar en el buffer.

A alguien le a ocurrido algo parecido y sabe como puedo solucionar este pequeño problema?

Gracias

A veces pasa de que el paquete no te llega todo junto y tenes que hacer una segunda lectura, tendrias que poner un while mientras no complete el tamaño del mensaje que espera o un timeout por supu.