foreach (@totalExoda){ $sum += $_; print "$sum\n"; } # end of for loop