Tengo la siguiente duda. Soy novato en este lenguaje necesito enviar y recibir datos desde el Perl a VB.
El detalle está en que no sé cómo recibir y luego mostrar la información por consola.
Using perl Syntax Highlighting
- use IO::Socket;
- $proto = getprotobyname('tcp');
- my($sock);
- socket($sock,AF_INET, SOCK_STREAM, $proto) or die "$!\n";
- #Conexion
- $remote ='10.0.0.1';
- $port = 1027;
- $iaddr = inet_aton($remote) or die "Unable to resolve hostname : $remote";
- $paddr = sockaddr_in($port, $iaddr);
- connect($sock, $paddr) or die "connect failed : $!";
- print "Connect to $remote on port $port\n";
- #Envío traza
- $Envia= "+Paso+301+000000000142303414+68776048+A+26092012+3012+USU+N+";
- send($sock, $Envia, 0);
- #Recibo Traza
- #Cierro Conexión
- close($sock);
- exit(0);
Coloreado en 0.006 segundos, usando GeSHi 1.0.8.4