package KGS::Messages; { } 1; $macro{} = [ ]; # my $msg = [ ]; $send{} = [ 0x, $msg ]; $recv{0x} = [ => $msg ]; [ => "", "", ""],