$port->write("26Jul1998 16:00   P000 0080 CALL  , unit 0\r\n");