Level check

[Huppy]

I'm just learning how to work with perl. I setup an npc in the PoK, that
ports you back to tutorialb, but this seems to overide the level rule on
the zone. (It sends an 85 toon there)
I was trying to find a way for the script to check for level (15 and higher)
and just give a message instead of porting the toon, if too high.

#zone: poknowledge

sub EVENT_SAY {
if ($text=~/hail/i || $text=~/leave/i) {
quest::say("Ok $name back to the Tutorial you go!");
quest::movepc(189,-105,-127,16);

}
}