Edward Wijaya wrote on 01.10.2004: >On Thu, 30 Sep 2004 14:23:47 -0300, Shaw, Matthew <[EMAIL PROTECTED]> >wrote: > >Thanks Matt, > > >>> > my %HoA = (key1 => ['A',1]); >>> > my %HoA2 = (key1 => ['B',2]); >>> > my %HoA3 = (key1 => ['C',2]); >>> > >>> > into: >>> > > >Only this one works > >>> push @{$HoA{key1}}, ( @{$HoA2{key1}}, @{$HoA2{key1}}); > > >Not this >> Sorry this should read: >> @{$HoA{key1}}, ( @{$HoA2{key1}}, @{$HoA3{key1}}); > >However what it gives is that it create one single array, >and not preserving the array that group ['A',1] etc, like before >namely: > >print Dumper \%HoA; >$VAR1 = { > 'key1' => [ > 'A', > 1, > 'B', > 2, > 'C', > 2 > ] > }; > >not; > >$VAR1 = { 'key1' => ['A',1],['B',2],['C',2]};
So you want a hash of an array of arrays, right? This is adding another level of encapsulation. So you could do this #get the actual length of your target array and add one $array_element = $#HoA{key1}++; #push the new list of values into a new array inside the HoA push $HoA{key1}->[$array_element], @{$HoA2{key1}} Or did I get you wrong? - Jan -- There's no place like ~/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>