@items = sort { lc($a) cmp lc($b) || $a cmp $b } @items;