10/12/2009, 18:22
|
| | | Fecha de Ingreso: diciembre-2009
Mensajes: 2
Antigüedad: 14 años, 5 meses Puntos: 0 | |
| Blocking!!
Hola gente soy nuevo aqui!
necesito ayuda para este codigo es para la universidad si me pueden ayudar muchisimas gracias!
mi codigo es este:
#!/usr/bin/perl
use IO::Socket;
use Socket;
print "content-type: text/html \n\n";
$Sock2 = new IO::Socket::INET(
PeerPort=>12000,
Proto=>'tcp',
PeerAddr=>'192.168.2.114',
Blocking => 1);
print "<body>\n";
print $Sock2 "Consulta";
$a = <$Sock2>;
print "la hora del sistema es: $a";
print "</body>";
close($Sock2);
tengo algo mal?..
lo q hace es cuando envio "consulta" el server me tiene q devolver la hora del sistema de una pc en windows, pero cuando lo kiero probar de linux en el mozilla me dice esperando a localhost y no pasa nada q podra ser??
gracias saludos |