$mit[$inde]=-1; @mit=sort @mit; shift @mit;