Updated Perl API (markdown)

Perl-API.md

@@ -1300,14 +1300,14 @@ $item->GetCharges();
 ```
 
 ```perl
-GetAugment(slot) # Returns an item object for the augment found in the slot supplied
+$quest_item->GetAugment(int16 slot_id)
-GetCharges() # Returns the number of charges on an item
+$quest_item->GetCharges()
-GetID() # Returns the ID of the item
+$quest_item->GetID()
-GetName() # Returns the name of the item
+$quest_item->GetName()
-IsAttuned() # Returns 1 if the item is attuned (instanced no drop)
+$quest_item->IsAttuned()
-IsType(type) # Returns 1 if the item is of the type supplied (valid types are 0=common, 1=container, 2=book)
+$quest_item->IsType(type)
-ItemSay(text, language) # The item says text, language is optional (currently only goes to item's owner)
+$quest_item->ItemSay(string text [int language_id])
-SetScale(multiplier) # Sets the scale multiplier for scaling items.  1.0 = full stats
+$quest_item->SetScale(float scale_multiplier)
 ```
 
 # Object