my $arr = [7,8,11];
$hash{one}[$_] += $arr->[$_] for 0 .. $#{$hash{one}};