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

##</code><code>##

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

##</code><code>##

$_/=10 for values %client_total;

##</code><code>##

map {$_/=10} values %client_total;