my $person = { id1 => $id1, id2 => $id2, name => $name };
$persons_by_id1{$id1} = $person;
$persons_by_id2{$id2} = $person;

...

my $id2 = $persons_by_id1{$id1}{id2};