A simple modbus/TCP client write in pure Perl.