for my $i ( 0 .. $#xyzvals ) { $s{ $bb }{ $xyz[ $i ] } = $xyzvals[ $i ]; }