my $cbusers_total_levels; for my $user (keys %cbusers) { $cbusers_total_levels += $cbusers{$user}; } print "Total: $cbusers_total_levels\n"; print "Average: ".$cbusers_total_levels / scalar(keys %cbusers); #even get the average w/o importing