in reply to (almost) Unique elements of an array

My reply in the recent thread removing non-duplicates can easily be modified to work case-insenstively.
my @a; # the data my %count; $count{lc $_}++ for @a; my @ic_unique = grep { $count{lc $_} == 1 } @a; # ic = "ignore case" print for @ic_unique; # or whatever you do with the result