@n=map {$count+=$_} ; print "@n\n"; __DATA__ 1 2 3 6 -5 6