Select Code to Download

my $total_value = 0;
foreach my $result (@{$testsub->result()}) {
...
      $total_value += $column->{test1};
   }
}