Mega Code Archive

 
Categories / Perl / Array
 

Sum values in an array

@array = (1, 2, 3); $running_sum = 0; foreach $element (@array) {     $running_sum += $element; } print "Total = $running_sum";