<>;@b=sort{$a-$b}@a=glob<>;print$b[-1]-pop@a?"@b[0..@b-3,-1,-2]":"@b"