Select Code to Download

Current baud rate is 1200
Current data bits setting is 7
Current parity setting is none
Current stop bits setting is 1
Current handshake setting is none

#!c:/perl/bin/perl
use strict;
...

undef $PortObj;
__END__