$\+=$_/4for sort{$a-$b}glob<>;print