my $msg = pack( "a20 i a*", $msgCode, $port, $ip );