unpack "Z*", $message;