Help for this page

Select Code to Download

Select or download this

my $columnsum += $_->[$colnum] for @data;
print "Total value = $columnsum";

Select or download this

$columnsum = 0;
$columnsum += $_->[$colnum] for @data;
print "Total value = $columnsum";