print reduce { $a + $b } 1,2,3;