my @unique1 = grep { $_ unless exists $hash2{$_} } keys %hash1;