[Quest API] Add Spell methods to Perl. (#1631)

* [Quest API] Add Spell methods to Perl.
- Add quest::getspell(spell_id) to Perl.
- Add eq.get_spell(spell_id) to Lua.
These methods return a spell object.

Exports $spell object references to spell events.

* Formatting.

* Remove comment.

* Update spdat.cpp

* Amplication typo.

* Fix conflicts.

* Remove repository changes.

* Fix typing.

* Update spell_effects.cpp

zone/client_mods.cpp

@@ -1521,7 +1521,7 @@ uint32 Mob::GetInstrumentMod(uint16 spell_id)
 	uint32 effectmod = 10;
 	int effectmodcap = 0;
 	if (RuleB(Character, UseSpellFileSongCap)) {
-		effectmodcap = spells[spell_id].songcap / 10;
+		effectmodcap = spells[spell_id].song_cap / 10;
 		if (effectmodcap) {
 			effectmodcap += 10; //Actual calculated cap is 100 greater than songcap value.
 		}