From e6712b20ae0de215aef20d550c7597631b6c0f8b Mon Sep 17 00:00:00 2001
From: Chris Miles <akkadius1@gmail.com>
Date: Sun, 1 Jul 2018 19:56:49 -0500
Subject: [PATCH] Updated Perl API (markdown)

---
 Perl-API.md | 33 +++++++++++++++++----------------
 1 file changed, 17 insertions(+), 16 deletions(-)

diff --git a/Perl-API.md b/Perl-API.md
index 62f5de7..494b4da 100644
--- a/Perl-API.md
+++ b/Perl-API.md
@@ -1365,32 +1365,33 @@ $door->GetModelName();
 ```
 
 ```perl
-$door->CreateDatabaseEntry()
 $door->GetDoorDBID()
+$door->GetDoorID()
 $door->GetHeading()
 $door->GetID()
 $door->GetIncline()
+$door->GetIncline()
 $door->GetKeyItem()
-$door->GetLockPick()
+$door->GetLockpick()
 $door->GetModelName()
-$door->GetNoKeyring()
+$door->GetNoKeyring(uint8 type)
 $door->GetOpenType()
-$door->GetSize()
 $door->GetX()
 $door->GetY()
 $door->GetZ()
-$door->SetHeading(heading)
-$door->SetIncline(type)
-$door->SetKeyItem(type)
-$door->SetLocation(x, y, z)
-$door->SetLockPick(type)
-$door->SetModelName(name)
-$door->SetNoKeyring(type)
-$door->SetOpenType(type)
-$door->SetSize(size)
-$door->SetX(XPos)
-$door->SetY(YPos)
-$door->SetZ(ZPos)
+$door->InsertDoor()
+$door->SetHeading(float heading)
+$door->SetIncline(uint32 incline)
+$door->SetKeyItem(uint32 key_item_id)
+$door->SetLocation(float x, float y, float z)
+$door->SetLockpick(uint32 lockpick_type)
+$door->SetModelName(string name)
+$door->SetNoKeyring(uint8 no_key_ring)
+$door->SetOpenType(uint32 open_type)
+$door->SetSize(uint32 size)
+$door->SetX(float x)
+$door->SetY(float y)
+$door->SetZ(float z)
 ```
 
 # Perl Debugging