Quest for progression?

[Valdis01]

my $NewStatus = $status;
my $AcctID = $client->AccountID();
my $SQLQuery = '';

sub EVENT_ITEM
{
  if(plugin::check_handin(\%itemcount, <itemid> => 1, <itemid> => 1, <itemid => 1))
  {
	$NewStatus = $NewStatus + 1;
	$SQLQuery = 'update account set status = '.$NewStatus.' where id = '.$AcctID.';';
	$status = idk;
	$dbh->do($SQLQuery);
	$client->Message(315, "$NPCNAME whispers to you, 'Congratulations, you now have flags for <enter name>.'");
  }
  else
  {
	$client->Message(315,"$NPCNAME whispers to you, 'What is this carp?'");
	plugin::return_items(\%itemcount);
  }
}

is a template my coder worked out... Not sure if it's okay, or....