Need some perl array help

[Valdaun]

Thank you for that! You got me exactly where I wanted to get to, though I took a slightly different approach for the array.

Using the quest turnin item ID as the primary index in my array was just the ticket.

I'll put up the whole quest in another post, but here's the interesting snippets of the finished product:

Array creation:

my %fabled_turnins = (
	5401 => { "cost" => $rare_cost, "reward" => 68259 },	#Mithril 2 hander & fabled
	5403 => { "cost" => $rare_cost, "reward" => 68260 },	#Ghoulbane & fabled
	5500 => { "cost" => $rare_cost, "reward" => 68263 },	#SS of Ykesha & fabled
	5412 => { "cost" => $rare_cost, "reward" => 68262 }		#Razing Sword of Skarlon & fabled
);

And from EVENT_ITEM:

foreach $item_id (sort keys %fabled_turnins)
{
	$cost = $fabled_turnins{$item_id}{"cost"};
	$reward = $fabled_turnins{$item_id}{"reward"};

	# hand out the goods on a match of item + cost
	if (plugin::check_handin(\%itemcount, $item_id => 1, $cost => 1))
	{
		quest::summonitem($reward);
	}
}