[provocating]

Same thing here, and I noticed from live the Task NPC's direct you to other ones, probably needs to be cleaned up as i have no idea what the level breaks are for the tasks.

Guard_Gregor.pl

sub EVENT_COMBAT {
	if($combat_state == 1){
	my $cur_target = $npc->GetHateTop();
		if($cur_target) {
		my $target_name = $cur_target->GetCleanName();
		quest::say("Time to die $target_name!");
		}
	}
}

sub EVENT_DEATH {
	quest::say("My comrades will avenge my death.");
}

sub EVENT_SAY {
	if($text=~/hail/i) {
		quest::say("I\'m only looking for those individuals who are strong of character and lack the fear of the world as is so common these days. A [task] completed and well done is all I care about.");
	} elsif ($text=~/task/i) {
		if(($ulevel >= 20) && ($ulevel <= 30)) {
			quest::say("Excellent! I was hoping you would be able to help me.");
			my @task_array;
			push(@task_array, 143); #Task: Bringing Goods to the Karanas
			push(@task_array, 509); #Task: Protect the Fishermen
      push(@task_array, 510); #Task: Danger to the North
			quest::taskselector(@task_array);
		}
		if ($ulevel>=31) {
			$client->Message(18,"You can speak with Klok F\`tshai, Marana Dreadflats, or Hoobert Flinkl in the Dreadlands.");
			$client->Message(18,"You can speak with Klok G\`rshai, Finlay Kitoran, Uggrig Skullchomper, or Skizz Skazz in the Overthere."); 
		}
		if ($ulevel>=50) {
			$client->Message(18,"You can speak with Cadale Brohat or Assistant Vagli in the Gulf of Gunthak."); 
		}
	}
}

sub EVENT_ITEM {
  quest::say("I have no use for this.");
  plugin::return_items(\%itemcount);
}