use Sort::Naturally;           # from CPAN
foreach $orf (nsort keys %mips) {
    push @mips, $mips{$orf};
}