$ perl -MList::Util=sum -wlF'' -e 'print sum @F'