使用perl实现简单的串口通信；在串口上循环读写命令，可用于对串口通信的压力测试；-Using perl simple serial communication　read and write commands on the serial loop, can be used for serial communication test pressure