foreach my $i (@array)
{
   $sum += $i;
}