Gracias.
Mirando el ejemplo veo
use Device::Modem;
my $modem = new Device::Modem( port => '/dev/ttyS1' );lo cual supongo que debería cambiar al puerto COM que esté conectado.
use Device::Modem;
my $modem = new Device::Modem( port => 'COM1' ); # ???ya que en .NET solo establezco
rscomm.Portname = "COMX"
rscomm.open()
Por favor, si pudiera tener un ejemplo básico de la conexión establecida con el COMX.
Bueno, leyendo un poco más encontré la solución:
Using text Syntax Highlighting
new()
Device::Modem constructor. This takes several options. A basic example:
my $modem = Device::Modem->new( port => '/dev/ttyS0' );
if under Linux or some kind of unix machine, or
my $modem = Device::Modem->new( port => 'COM1' );
if you are using a Win32 machine.
Coloreado en 0.000 segundos, usando
GeSHi 1.0.8.4
Muchas gracias. Saludos, explorer.