Well no, it would be

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

Makeshifts last the longest.