use strict;
use Devel::Size qw(total_size);

my %hash = ( 0 => 3,
             1 => 7,
             2 => 5,
             3 => 0,
             4 => 2,
           );

my @vals = qw(3 7 5 0 2);

print 'T1: ', total_size(\%hash),"\n";
print 'T2: ', total_size(\@vals),"\n";