$ perl -MList::Util=reduce -wlF'' -e 'print reduce { $a + $b } @F' 321023 11 321 6 023 5 #### $ perl -MList::Util=sum -wlF'' -e 'print sum @F'