my $sum = 0;

for(@num){
  $sum += $_;
}

print "The sum is: $sum\n";