@a = 1 .. 10000;;
print total_size \@a;;
320176

$#a = 5000;;
print total_size \@a;;
200376