in reply to beginner help

use List::Util qw[sum ];<br> my $totalSum = sum (1..100); print "$totalSum\n";