{
  no warnings 'uninitialized';
  for(0..3) {
    ($sums[$i])->[$_][$j] += $vals[$_+1];
    if($ts >= 21) {
      $sums[$i]->[4][$j] += $vals[5];
      $sums[$i]->[5][$j] += $vals[6];
    }
  }
  $totals[$i]->[$j]->[0]++;
}