sub case_insensitive_cmp { lc($a) cmp lc($b) }