@s[1] += $i; @t[3]=@s[1];       end{dump; emitp@s; emitp @t}
