for my $key (sort keys %client_total) {
 $client_total = {$key} = $client_total/10;
}

for my $key (sort keys %client_total) {
    print "$key: $client_total{$key}\n";
}