> I have thre HoAs with the same key but different value. > How can I efficiently join the HoA: > > my %HoA = (key1 => ['A',1]); > my %HoA2 = (key1 => ['B',2]); > my %HoA3 = (key1 => ['C',2]); > > into: > > %HoA = (key1 => ['A',1],['B',2],['C',2]); >
push @{$HoA{key1}}, ( @{$HoA2{key1}}, @{$HoA2{key1}}); > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > <http://learn.perl.org/> <http://learn.perl.org/first-response> > -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>