Select Code to Download

use strict;
use warnings;
...
#   $bin{$hkey}[0, 1] = [$tmp_count, $tmp_sum]; #why not?
}
print Dumper (%bin);

#   0 => [ 0,   0];
#  40 => [ 3, 705];
...
# 442 => [ 0,   0];
# 244 => [ 1, 321];
# 503 => [ 1, 210];