Help with Perl serial communication

GoogleGroups
1

Here is my code

use Device::SerialPort;
my $port=Device::SerialPort->new("/dev/ttyO1");

$port->baudrate(9600);
$port->databits(8);
$port->parity(“none”);
$port->stopbits(1);

$port->write(“Hello”);

exit;

When I run the code I get this error

Can’t locate Device/SerialPort.pm in @INC (@INC contains: /etc/perl /usr/lib/perl/site_perl/5.14.2/ /usr/lib/perl/site_perl/5.14.2 /usr/lib/perl/vendor_perl/5.14.2/ /usr/lib/perl/vendor_perl/5.14.2 /usr/lib/perl/5.14.2/ /usr/lib/perl/5.14.2 /usr/local/lib/site_perl /usr/lib/perl/5.14.2 .) at p.pl line 1.
BEGIN failed–compilation aborted at p.pl line 1.

Anybody have a solution or another way to communicate via serial?

2

root@bbb:~# cpan -i Device::SerialPort

that will install the missing perl module