[Perl] Resposta do socket

[Anonymous]

Estou fazendo um programaminha tipo o telnet , mas to tendo um pouco de dificuldades em relação a resposta recebida. Por exemplo, eu enviei a seguinte string "GET /" ao um servidor, então ele responde, gostaria de saber como mostrar a resposta do servidor. Valeu.