Success! Thanks KLS and everyone else that helped.
Final product for those wanting to do something similar in the future:
Code:
sub EVENT_TIMER{
if ($timer == 1){
my $hate_target = $npc->GetHateRandom();
my $hate_name = $hate_target->GetName();
my $hate_id = $hate_target->GetID();
quest::shout("My hate target is $hate_name");
if($hate_target->IsClient()){
$hate_target->SetLevel(1, false);
}
undef $hate_target;
}
}