[Quest API] Add GetGuildPublicNote() to Perl/Lua. (#2608)

# Perl
- Add `$client->GetGuildPublicNote()`.

# Lua
- Add `client:GetGuildPublicNote()`.

# Notes
- Allows operators to grab a player's public note in there guild if they wanted to.

zone/client.cpp

@@ -11977,3 +11977,17 @@ void Client::SetSpellDuration(
 		m->SetBuffDuration(spell_id, duration);
 	}
 }
+
+std::string Client::GetGuildPublicNote()
+{
+	if (!IsInAGuild()) {
+		return std::string();
+	}
+
+	CharGuildInfo gci;
+	if (!guild_mgr.GetCharInfo(character_id, gci)) {
+		return std::string();
+	}
+
+	return gci.public_note;
+}