qglobal issues

[boo2]

# Grizzly

my $globalname = "Grizzly";

sub EVENT_SAY {
my $NPCName = $npc->GetCleanName();

my $journey    = quest::saylink("journey", 0, "journey");

   if($text=~/hail/i && $qglobals{$globalname} == 2){
         quest::emote(" stares at you with disbelief.");
   }
    elsif($text=~/hail/i && !$qglobals{$globalname} ){
        quest::say("Greetings $name, I am the Milita Recruiter. Would you like to begin your $journey?");
   }
    elsif($text=~/journey/i){
        quest::setglobal("$globalname",1,2,"F");
        quest::summonitem(33969);
        quest::say("Welcome to the Militia, $name. You will report to Tzu with this note, and he will take it from there. Good luck."); }
}
}

that is what i have now, now it crashes the zone.

I want you to be able to get your note from this guy, and then he will just stare at you in disbelief if you hail him again.