diff --git a/Perl-API.md b/Perl-API.md
index 494b4da..97aacb4 100644
--- a/Perl-API.md
+++ b/Perl-API.md
@@ -853,24 +853,23 @@ $entity_list->ValidMobByNpcTypeID(get_id)
  * $group needs to be fetched from an entity object, for example:  $group = $client->GetGroup())
 
 ```perl
-$group->CastGroupSpell(caster, spellid)
+$group->CastGroupSpell(mob* caster, uint16 spell_id)
 $group->DisbandGroup()
 $group->GetHighestLevel()
 $group->GetID()
 $group->GetLeader()
 $group->GetLeaderName()
-$group->GetMember(number) # Returns a client pointer to the group member (NULL if that member doesn't exist)
-$group->GetTotalGroupDamage(other)
+$group->GetMember(int group_index)
+$group->GetTotalGroupDamage(mob* other)
 $group->GroupCount()
-$group->GroupMessage(sender, message)
+$group->GroupMessage(mob* sender, uint8 language, string message)
 $group->IsGroupMember(client)
-$group->IsLeader(leadertest)
-$group->SendHPPacketsFrom(newmember)
-$group->SendHPPacketsTo(newmember)
-$group->SetLeader(newleader)
-$group->SplitExp(exp, other)
-$group->SplitMoney(copper, silver, gold, platinum)
-$group->TeleportGroup(sender, zoneID, x, y, z)
+$group->IsLeader(mob* target)
+$group->SendHPPacketsFrom(mob* new_member)
+$group->SendHPPacketsTo(mob* new_member)
+$group->SetLeader(mob* new_leader)
+$group->SplitExp(uint32 exp, mob* other)
+$group->SplitMoney(uint32 copper, uint32 silver, uint32 gold, uint32 platinum)
 ```
 
 # Raid