my @avg = [ map { $_/$data{$group}{ROWCNT} } @{$data{$group}{SUMS}} ];
print "GROUP $group: [", join(", ", @avg), "]\n";