I -believe- this is what you're looking for (i.e. how to access/use a key in a hash of a hash):
Code:
%combine_1 = (
1 => { "item1" => 1234, "item2" => 1111, "type" => 1, "reward" => 11111 }, # Ring
2 => { "item1" => 1234, "item2" => 2222, "type" => 4, "reward" => 22222 }, # Veil
3 => { "item1" => 1234, "item2" => 3333, "type" => 3, "reward" => 33333 }, # Earring
4 => { "item1" => 1234, "item2" => 4444, "type" => 1, "reward" => 44444 }, # Ring
5 => { "item1" => 1234, "item2" => 5555, "type" => 2, "reward" => 55555 }, # Necklace
);
{
foreach my $key (sort keys %combine_1)
## could be shortened: foreach (sort keys $combine_1)
{
if ($combine_1{$key}->{type} == 1)
## if above shortened: if ($combine_1{$_}->{type} == 1)
{
my $itemlink = quest::varlink($combine_1{$key}->{reward});
## my $itemlink = quest::varlink($combine_1{$_}->{reward});
$client->Message(15, $itemlink);
}
}
}
?