Select Code to Download

obj1 --> 1
obj1 --> 2
...
obj2 --> 4
obj2 --> 5
obj2 --> 6

$test{obj1} = \%data;
$test{obj2} = \%data;
...
{
  push(@{$test{obj2}{values}},$i);
}