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