for (0 .. $len-1) { $$targ_shift[$_] += $k[$targ_shift[$_+1]] << $shift; }