#!perl -p $\+=$_}{