my $total_number = ; chomp ($total_number); my $number = ; my @numbers = split(/ /, $number); my $ans = 0; $ans += $_ for @numbers; print "$ans\n";