my $total;
$total += $_->{$member} for values %main;