Eden,<br>Valeu a dica mas ainda assim nao funcionou :(<br><br>o que parece eh que o cliente esta esperando algum tipo de flush do servidor.<br>o servidor recebe o Hello e manda como resposta TESTE <br>no servidor aparece o Hello e aparece no log dele que ele enviou a resposta TESTE
<br>so que no cliente perl nao aparece <br>se eu conectar com o telnet o TESTE e exibido na tela <br><br>Obrigado.<br><br><div><span class="gmail_quote">Em 22/05/07, <b class="gmail_sendername">Eden Cardim</b> &lt;<a href="mailto:edencardim@gmail.com">
edencardim@gmail.com</a>&gt; escreveu:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">On 5/22/07, Andre Luis &lt;<a href="mailto:alpbs2003@gmail.com">
alpbs2003@gmail.com</a>&gt; wrote:<br>&gt; Alguem pode me ajudar ?<br><br>Bem, não tenho como testar aqui porque não faço idéia de como o<br>servidor com o qual você está se comunicando é implementado.<br><br>&gt; print $server &quot;Heloo&quot;;
<br><br>Meu chute é de essa linha é a culpada. Voce precisa dar um flush no<br>filehandle do server. Por padrão, o perl dá flush assim que encontra<br>um newline (&quot;\n&quot;). Como você não mandou um newline, a informação nunca
<br>é enviada ao servidor. experimenta isso:<br><br>&nbsp;&nbsp;&nbsp;&nbsp;print $server &quot;Hello\n&quot;;<br><br>ou isso (se você realmente não pode mandar um &quot;\n&quot; pro servidor):<br><br>&nbsp;&nbsp;&nbsp;&nbsp;print $server &quot;Hello&quot;;<br>
&nbsp;&nbsp;&nbsp;&nbsp;$server-&gt;flush;<br><br>--<br>Eden Cardim<br>Instituto Baiano de Biotecnologia<br>Núcleo de Biologia Computacional e Gestão de Informações Biotecnológicas<br>Laboratório de Bioinformática<br>_______________________________________________
<br>Rio-pm mailing list<br><a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/rio-pm">http://mail.pm.org/mailman/listinfo/rio-pm</a><br></blockquote></div><br>