my @result = reduce { $a + $b } @input;