$\=<>*2-2;$_<$-or$\-=/ /,$-=$' for sort{$a=~$"*$'-$b=~$"*$'}<>;print