• Publicidad

VB6 y Perl. Enviar y recibir datos winsock y socket

¿Ya sabes lo que es una referencia? Has progresado, el nível básico es cosa del pasado y ahora estás listo para el siguiente nivel.

VB6 y Perl. Enviar y recibir datos winsock y socket

Notapor bdarymar » 2013-02-03 12:28 @561

Buen día.
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.

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. use IO::Socket;
  2. $proto = getprotobyname('tcp');
  3. my($sock);
  4.  
  5. socket($sock,AF_INET, SOCK_STREAM, $proto) or die "$!\n";
  6. #Conexion
  7. $remote ='10.0.0.1';
  8. $port = 1027;
  9. $iaddr = inet_aton($remote) or die "Unable to resolve hostname : $remote";
  10. $paddr = sockaddr_in($port, $iaddr);
  11. connect($sock, $paddr) or die "connect failed : $!";
  12. print "Connect to $remote on port $port\n";
  13. #Envío traza
  14.  
  15. $Envia= "+Paso+301+000000000142303414+68776048+A+26092012+3012+USU+N+";
  16. send($sock, $Envia, 0);
  17. #Recibo Traza
  18.  
  19. #Cierro Conexión
  20. close($sock);
  21. exit(0);
Coloreado en 0.006 segundos, usando GeSHi 1.0.8.4
Última edición por explorer el 2013-02-03 12:36 @566, editado 1 vez en total
Razón: Marcas de código Perl
bdarymar
Perlero nuevo
Perlero nuevo
 
Mensajes: 3
Registrado: 2013-01-30 15:14 @676

Publicidad

Re: VB6 y Perl. Enviar y recibir datos winsock y socket

Notapor explorer » 2013-02-03 12:49 @576

Bienvenido a los foros de Perl en Español, bdarymar.

¿La comunicación tiene que ser obligatoriamente por TCP? ¿Son dos procesos que se ejecutan en la misma máquina o no? ¿Uno de los procesos hace de servidor y otro de cliente? ¿Se ejecutan a la vez o primero uno y luego el otro?
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: VB6 y Perl. Enviar y recibir datos winsock y socket

Notapor bdarymar » 2013-02-03 13:50 @618

1)¿La comunicación tiene que ser por TCP?
Sí. Trabajamos con una aplicación ya desarrollada en VB6.

2) ¿Son dos procesos que se ejecutan en la misma máquina o no?
No. Sé tiene un servidor de prueba de la siguiente manera: cortafuegos, PostgreSQL, Win2003 (aquí tenemos el servidor con la aplicación de conexión desarrollada en VB6).

3.a) ¿Uno de los dos procesos hace de servidor?


3.b) ¿Uno de los dos procesos hace de cliente?


4) ¿Se ejecutan a la vez o primero uno y luego el otro?
Simultáneo; el servidor siempre está escuchando para responder.

Gracias de antemano.
bdarymar
Perlero nuevo
Perlero nuevo
 
Mensajes: 3
Registrado: 2013-01-30 15:14 @676

Re: VB6 y Perl. Enviar y recibir datos winsock y socket

Notapor explorer » 2013-02-03 17:19 @763

Bueno, yo no he hecho mucha programación en red, pero por estos foros hemos comentado algo del tema, y hemos publicado bastantes ejemplos. Lo que sí veo es que en tu programa usas código a muy bajo nivel, lo cual quizás solo merece la pena si el protocolo es de muy bajo nivel.

Mira, por ejemplo, mi respuesta en el hilo Comunicación Sockets. Ahí se indica un enlace al famoso artículo de la Linux Journal de 1999 donde están las bases de la programación en Perl.

También hay un enlace a otro hilo, Enviar datos sin cambiar formato por socket, donde en el último mensaje se dan distintos ejemplos, de programas cliente y servidor, en versión con IO:Socket, de bajo nivel, y con IO::All, de muy alto nivel (quizás, excesivo :) )

En todos esos sitios tienes descritas las bases de la programación en red, en Perl.

En tu ejemplo, si quieres seguir con la programación a bajo nivel, debes usar la función recv() para la recepción de datos. La documentación oficial de Perl no da mucha información. En el artículo de la Linux Journal sí que encontrarás ejemplos.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: VB6 y Perl. Enviar y recibir datos winsock y socket

Notapor bdarymar » 2013-02-03 17:41 @778

Sí, amigo, estoy comenzando a usar este lenguaje. Si me puede orientar para mejorar y tener un buen desarrollo de alto nivel. Si me puedes recomendar algunos hilos con ejemplos para lograr un mejor nivel en el código.

Gracias de antemano.
bdarymar
Perlero nuevo
Perlero nuevo
 
Mensajes: 3
Registrado: 2013-01-30 15:14 @676


Volver a Intermedio

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados

cron