for ($i=0; $i<@xyzvals; $i++) {
        $s{$bb}{$xyz[$i]} = $xyzvals[$i];
        }