foreach (@A) {
  $sum+=$_;
}
print "$sum\n"; #sum=77009052