$N=<>;$\+=$_*++$i*$N--for glob<>;print