[Quest API] Add EVENT_GM_COMMAND to Perl/Lua. (#2634)

# Perl
- Add `EVENT_GM_COMMAND`, exports `$message`.

# Lua
- Add `event_gm_command`, exports `e.message`.

# Notes
- Only parses with real GM commands such as `#reload quest`.

zone/command.cpp

@@ -602,6 +602,8 @@ int command_realdispatch(Client *c, std::string message, bool ignore_status)
 		return -1;
 	}
 
+	parse->EventPlayer(EVENT_GM_COMMAND, c, message, 0);
+
 	cur->function(c, &sep);	// Dispatch C++ Command
 
 	return 0;