sub caseless ($$) { lc $_[0] cmp lc $_[1] }