my %rounded_stats = map {
    $_ => sprintf '%.2f', $stats{$_}
} keys %stats;