Spellscriber/Disctrainer

[talra]

so i am using George's tools to make a spellscriber and i found the function for training discs on the forums also but my script doesnt seem to work. any advice would be very useful as i am new to perl scripting.

sub EVENT_SAY
{
 {
if ($text =~/hail/i){   quest::say ("Good day to you, $name. Do you want me to teach you [spells] or [disc]."); }
}

if($text =~/spells/i)
{
 quest::say ("Good, stand where you are while I cast");
 quest::scribespells();
}
if($text =~/disc/i)
{
 quest::say ("Good, stand where you are while I cast");
 quest::traindiscs();
}

}