<>;($\)=sort{$b-$a}($_+$k,$k=$\)for glob<>;print