for my $j (keys %{ $from_to_bytes{$i} }) { $total_col{$j} += $from_to_bytes{$i}->{$j};