$_= sprintf "%.2f", $_
    for values( my %rounded= %stats );
[download]

But that won't work in old Perls where values doesn't return a list of aliases.