Perl with SerialPort