Help for this page

Select Code to Download


  1. or download this
    my %master_hash;
    
    for my $anon_hash_ref ( @AoH ) {
        $master_hash{ $$anon_hash_ref{id} } += $$anon_hash_ref{value};
    }
    
  2. or download this
    for my $anonhash ( @AoH ) {
        $master_hash{ $$anonhash{id_a} } += $$anonhash{value_x};
        $master_hash{ $$anonhash{id_b} } += $$anonhash{value_y};
    }
    
  3. or download this
    for my $anonhash ( @AoH ) {
        $master_hash{ "a".$$anonhash{id_a} } += $$anonhash{value_x};
        $master_hash{ "b".$$anonhash{id_b} } += $$anonhash{value_y};
    }
    
  4. or download this
    for my $anonhash ( @AoH ) {
        my $newkey = join '_', 'a', $$anonhash{id_a}, 'b', $$anonhash{id_b
    +};
    ...
        $master_hash{$newkey}[0] += $$anonhash{value_x};
        $master_hash{$newkey}[1] += $$anonhash{value_y};
    }