my @mips = sort { lc($a) cmp lc($b) } values %mips;