> 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>