Help for this page
for my $v ( values %Your_Hash_name ){ $total += $v; }
>perl -wMstrict -le "my %hash = ( ... " 73273728 36.64
>perl -wMstrict -le "use List::Util qw(sum); ... print $total; " 36.64